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SOFT WARF- MAGAZIN 


Die aktuelle Ausgabe gibt’s jetzt überall 






© 132 Seiten Programme im Test 

® der Software-Markt auf einen Blick 

® speziell gesuchte Software kann direkt 
beim Hersteller bestellt werden 

© für alle Anwender von Heimcomputern 
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Programmautoren im Wettbewerb. 


Im Zeichen des Programmautoren-Wettbewerbs sind wieder einige her- 
vorragende Programme bei uns eingetroffen. Als besonderer Lecker- 
bissen erscheint in dieser Ausgabe das von vielen sa lang ersehnte 
Terminalprogramm für den Plus 4. Der Autor, M. Mehlhose, hat mit 
reichlichem Aufwand ein Terminalprogramm erstellt, das es mit den 
meisten professionellen Terminalprogrammen anderer Systeme leicht 
aufnehmen kann. Natürlich enthält auch diese Ausgabe eine Reihe wei-: 
terer nützlicher Anwendungsprogramme wie auch spannender Spiele. _ = 
Als weitere große Neuigkeit berichten wir von einer noch wenig er- 
schlossenen Softwarequelle für C16-Besitzer. C-16 Programme aus 
Ungarn sind neuerdings auf dem deutschen Markt erhältlich, allerdings 


. zunächst nur bei einigen wenigen Anbietern. Sie werden als Freeware 








gehandelt und weisen teilweise eine recht ordentliche Qualität auf. Be- 
reits für dieses Heft haben wir drei interessante Programme getestet : 
und können Sie Ihnen vorstellen. Auch bei den Tips und Tricks wer- 
den Sie mal wieder überrascht sein, was auf dem C-16 so az > 3 
bar ist. Viel Spaß! 2 


Zum Wettbewerb 


Nach dem Motto: Wer den C-16 nicht ehrt, ist den Amiga nicht wen, 
können seit der Ausgabe 1/88 alle C-1 6-Programmierer in unserem 
Sonderheft zum Wettstreit antreten. Wir suchen nämlich die besten 
Programme für den kleinen Commodore. Das können Super- 
Programme sein, die ein ellenlanges Listing beinhalten, oder aber ganz 
kurze Listings, die eine ganz entscheidene Hilfe für jeden O©-16-Freak 
sein können. Entscheidend ist also die Qualität und nicht die Muaa 


Natürlich sollen unsere Programmierer auch eine zusät itäliche Beloh-. 
nung erhalten, neben dem normalen Honorar für die erbrachte: Leistung. 
Halten Sie sich fest: Für die drei besten Programmbeiträge stiftet der. 
Tronic-Verlag einen Amiga 500, einen Atari ST und einen C-641 


Hinzu kommen noch weitere 30 Preise, für die slchidie Teilnahme ha 
falls lohnt. So einfach können Sie zu einem größeren Computer kom- 
men! Die einzige Bedingung ist die Veröffentlichung Ihres’ selbst. 
entwickelten Programms in einer der sechs Ausgaben, ale in ‚diesem 
Jahr erscheinen werden. ee 


Yale Abm 


Volker Lohrengel 2 
(Chefredakteur) u a 


Sn 
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Anfragen nicht an den Vertrieb’ oder Drucke- 
rei, sondern nur an den Verlag! 


Vertrieb 

Innland (Groß-, Einzel- und Bahnhofsbuchhandel) 
* ich und Schweiz: 

Verlagsunion, 6200 Wiesbaden 


Friedrich-Bergius-Str. 20 


Telefon: 0.61 21 / 2660 
Erscheinungswei 


En 
ise: 
Erstverkaufstag von ”C-16” Sonderheft jeweils 


Ende des Monats. 


Urheberrecht: 


ne 
Alle in "Compute mit” veröffentlichten Beiträge 


sind urheberrechtlich geschützt. Alle Rechte, auch 
Übersetzungen, vorbehalten. i 
Repeonpkeionen jeder Art (Fotokopien, Micro- 


erstelkt. 
Aus ihrer Veröffentlichung kann nicht geschlos- 
sen werden, daß die beschriebenen Lösungen 
Bezeichnungen frei von Schutzrechten sind, 


Sandeheh 6.50 DM 


n FeReRT 


Montag + Freitag von 14 bis 16 Uhr 
Telefon: 05651/30013 





ED  — 
Autoren, Manuskripte: 
:; Der Verlag nimmt‘Manuskripte zur Veröffentli- 


chung gerne entgegen. 


Sollte keine andere Vereinbarung getroffen sein, 
so gehen wir davon aus, daß Sie mit einem Ho- 


norar von 120,- DM pro abgedruckte Seite einver- | 
standen sind. 


" Bitte Meleiigeh anfordern. 
I ne 


ns 


; Bei’ Zusendung von Manuskripten und Software 


erteilt der Autor dem Verlag die Genehmigung 
zum: Abdruck und Versand der veröffentlichten 
Programme auf Datenträger. Alle Einsendungen 
müssen frei von Rechten Dritter sein. Dies muß 
mit der Unterschrift des Einsenders ‚bestätigt 
wei 


Buspaumg el. nur geg Erstattung der Ko- 
sten. Zusendungen von Software zur Veröffentli- 
chung sollten folgendes enthaken: 


von erstelktes 
ee 
ies mit Demonstrationsbeispielen 
und Zusführlicher ‚Programm ag 
(Erklärung der programm! ischen Besonder- 
heiten, Spielverlaufbeschreibung). Für ande 
aftung 


‚Programmunterlagen kann. , keinerlei 


'übernaommen werden. 
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Programm: CAD 123 
System: C16/116 und Plus4 
mit Floppy 1551 o. 1541 
Preis: 149 - 219 DM 
Hersteller: Software-Entwick- 
lung Rätzel 

Bezugsquelle: Dipl.Ing. Malte 
Rätzel, Ulvenbergstr. 6, 6100 
Darmstadt 13 


Das seit längerem angebotene 
Programm CAD 123 der Firma 
Software-Entwicklung Rätzel, 
liegt jetzt in einer neuen Ver- 
sion vor. CAD 123 ist für alle 
möglichen Anwendungen aus- 
gelegt, z.B. Architektur- und 
Innenarchitekturzeichnungen, 
Schaltpläne, Netzpläne, Kon- 
‚struktionszeichnungen, Gra- 
phiken, Symbolzeichnungen, 
"Wegenetzkarten, Werkbau- 
pläne, schematische Darstel- 
fungen und vieles mehr. 


Das Programm verfügt über 43 
Befehle, die ihrerseits eine 
Vielzahl von Optionen beinhal- 
:ten. Eine Zeichnung kann aus 
insgesamt 99 Ebenen aufge- 
: baut werden. Diese können in 
beliebiger Kombination ein- 
bzw. ausgeschaltet werden. 
' Die Zeichenfläche kann theore- 
tisch 10 Einheiten in beiden 
Ausdehnungen erreichen. Der 
Umfang einer Zeichnung ist le- 
diglich durch die Kapazität ei- 
ner Diskette begrenzt; das ent- 
spricht 4.000 Elementen. 


Bei der neuen Version -von 
CAD 123 werden alle Befehle 
aus dem Zeicheneditor aufge- 
rufen. Die Programmsteuerung 
erfolgt im Dialog. Durch Ein- 
schalten des Druckerechos 
kann der Dialog protokolliert 
werden, welches das Erlernen 


der Bedienung des Programms: 


sehr vereinfacht. Ab dieser 
Version können alle Konstruk- 
tionspunkte alternativ durch 
Zeigen mit dem Fadenkreuz, 
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Zeichnung einer Platine 


mittels. einer Objektfangfunk- 
tion oder alphanumerisch ein- 
gegeben werden. Die alpha- 
numerische Eingabe eines 
Punktes kann absolut, relativ 
oder polar erfolgen. Das Fa- 
denkreuz kann mit neun unter- 
schiedlichen Geschwindigkei- 
ten gesteuert werden. Die Li- 
ste der Editierbefehle wurde 
dürch die Befehle Ändern, Bre- 
chen, Ecke, Dehnen, Strecken 
und Stutzen erweitert. Außer- 
dem kann jetzt unter Beibehal- 
tung des zu spiegelnden Ob- 
jektes gespiegelt werden. Der 
Zoombereich liegt nun bei 10 
für Vergrößerungen und bei 10 
tür Verkleinerungen. 


Zeichnungsausschnitte können 
frei benannt und gespeichert 
werden. Die Größe der Biblio- 
theksobjekte ist jetzt unbe- 
grenzt. Eine Zeichnung kann in 
beliebiger Größe und Richtung 


REPORT EEE 
Zeichnen mit CAD 


für C16/116/Plus4 
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beschriftet und bemaßt wer- 
den. Als Zeichnungshilfe kann 
ein Raster mit beliebigem X- 
und Y-Aspekt eingeschaltet 
werden. 


Sämtliche Vorgabewerte einer 
Zeichnung (Konfigurationsda- 
ten, Bildschirmfarben, Blatt- 


größe, Plottformat, Zeich- 
nungsausschnitte, Ebenen, 
Textgröße und -richtung, 


Bemaßungsvariablen und die 
Systemvariablen) können aus 
vorherigen Zeichnungen über- 
nommen werden. Dias können 
von jedem Zeichnungsaus- 
schnitt erzeugt und in beliebige 
Zeichnungen eingeblendet 
werden. Ebenso können die 
Diadateien extern als HIRES- 
Grafiken genutzt werden. 


CAD 123 ist aufwärtskompati- 
bel. Zeichnungen die mit der 
Version 1.2 erzeugt wurden, 


können mit der Version 2.0 
nach einer Konvertierung wei- 
ter bearbeitet werden. Ab der 
Version 2.0 kann CAD 123 zur 
Anpassung an die vorhandene 
Gerätekonstellation konfiguriert 
werden. 


Die Mindestkonfiguration be- 
steht aus dem Rechner und ei- 
ner Floppy (1541 od. 1551). 
Zusätzlich kann eine zweite 
Floppy angeschlossen werden, 
was Vorteile beim Laden der 
Overlaydateien bringt. Alterna- 
tiv kann zur zweiten Floppy 
auch die Datasette eingesetzt 
werden. i 


Eine weitere, weitaus schnel- 
lere Möglichkeit bietet das 
Hardwaresteckmodul CAD 
123e 2.0. Die Zeichnungsaus- 
gabe erfolgt in beliebigem 
Maßstab entweder per DIN A4 
Hardcopy oder als Plott. Unter- 


5 
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stützt werden praktisch alle zu 
den Commodore Druckern 
kompatiblen Matrixdrucker. 
Der Plott wird über die Plottda- 
tenschnittstelle in einer Plottda- 
tendatei, welche universell für 
jeden Plotter einsetzbar ist, 
ausgegeben. 


CAD 123 gibt es in drei Pake- 
ten "zu unterschiedlichen 
Preisen: 


CAD 123 2.0 -Ein-Floppy oder 
Zwei-Floppy-Betrieb (Diskette) 
149DM 

CAD 123c 2.0 -Ein-Floppy oder 





Floppy-Datasettenbetrieb 
(Diskette und Endloskassette) 
159 DM 


CAD 123e 2.0-Hardwaresteck- 
modul für alle drei Betriebsar- 
ten (steckfertige Platine und 
Diskette) 219 DM 


tos und Skizzen enthalten. 


Zu beachten ist, daß der Data- 
setteneinsatz nur in Verbin- 
dung mit dem TURBO PLUS 
MODUL möglich ist. Im Liefe- 
rumfang ist ein übersichtliches 
Handbuch mit zahlreichen Fo- 


Tom 





DATEX - Textverarbeitung und 
Adressverwaltung in einem 


Textverarbeitung mit ‚80 Zei- 
chen pro Zeile 


Programm: Datatex Version 
1.0 
System: Plus/4; C16+64k 


Preis: Diskette 34,90 DM, Kas- . 


sette 24,90 DM 
Hersteller/Bezugsquelle: 
Computer Service, Michael & 
Joachim Maier GbR, Postfach 
1304, 7913 Senden 


Mittlerweile scheinen sich der 
Plus 4 und seine kleineren 
Brüder als echte Textverarbei- 
tungssysteme zu entpuppen. 
Immer mehr und auch immer 
günstigere Textprogramme 
werden für diese Computer 
angeboten. Das nicht immer.al- 
les Gold ist, was glänzt, haben 
wir jaschon bei vielen anderen 
Tests feststellen müssen. 
Diesmal waren wir gespannt, 
was das neue Textverarbei- 
tungsprogramm DATATEX der 
Firma Computer Service lei- 
stet. 


Genauer gesagt, handelt es 
sich hier um eine kleine Kom- 
plettlösung. Nicht nur die üb- 
liche Korrespondenz kann mit 
diesem Programm erledigt 
werden, sondern man wird 
auch in die Lage versetzt, Se- 
rienbriefe _ ausdrucken zu 
können. 


Als besonderes Feature bietet 
der Hersteller die 80 Zeichen 
Darstellung. Da wir bisher noch 
keine geeignete 80 Zeichen- 


6 % 


80 Zeichen pro Zeile... 


darstellung auf diesem Rech- 
ner gesehen haben, waren wir 
zunächst kritisch. Bereits ein 
anderes von uns in der Normal- 
ausgabe Compute mit (Heft 
6/88) vorgestellte Textverarbei- 
tung mit ’80 Zeichen pro Zeile’ 
hatte u.a. wegen der schlech- 
ten Lesbarkeit des Bildschirms 
schlechte Testergebnisse er- 
zielt. 


Geliefert wird das Programm 
wahlweise auf Kassette oder 
Diskette zusammen mit einer 8 
Seiten starken Dokumentation. 
Erfreulich ist, daß sowohl das 
Programm wie auch die Doku- 
mentation in Deutsch verfaßt 
ist. Wenn ich von ”Deutsch” 
rede, meine ich natürlich auch 
die Umlaute. Zwar lassen sich 
die Umlaute teilweise nur über 





umständliche Tastenkombina- 
tionen erreichen, jedoch er- 
scheinen sie sowohl auf dem 
Bildschirm als auch auf dem 
Drucker. 


Unsere kritische Erwartung 
gegenüber der 80 Zeichendar- 
stellung erwies sich als berech- 
tigt. Die 80 Zeichen werden 
durch das Halbieren der Zei- 
chenmatrix erreicht. Jeder 
kann sich leicht vorstellen, wie 
die Qualität der Bildschirmaus- 
gabe unter dieser Halbierung 
leidet. Selbst auf einem Moni- 
tor lassen sich die einzelnen 
Buchstaben nur mit viel Mühe 
unterscheiden. Eine 40 Zei- 
chendarstellung mit Horizon- 
tal-Scrolling wäre sicherlich 
wesentlich geeigneter 
gewesen. 


Horizontal-Scrolling ist leider 
nicht möglich, allerdings auf 
das vertikale Scrolling braucht 
man nicht zu verzichten. Zwar 
ruckelt der Bildschirm sehr 
langsam nach oben bzw. un- 
ten, jedoch kann man durch- 
aus vernünftig arbeiten. Ledig- 
lich, wenn man einen längeren 
Text schnell "überfliegen” 
möchte, muß man schon etwas 
Zeit mitbringen. Allerdings 
kann man zu diesen Zweck 
auch seitenweise blättern, was 
das Arbeiten wesentlich be- 
schleunigt. 


Die Texteingabe sowie die 
Cursorbewegungen werden in 
einer angemessenen Ge- 
schwindigkeit ausgeführt. Der 
große Tastatur-Puffer sorgt da- 
für, daß selbst bei schneller 
Eingabe kein Text verloren- 
geht. Der Text läßt sich mit den 
Cursortasten bequem editie- 
ren. Über Controll-Sequenzen, 
die am oberen Bildschirmrand 
angezeigt werden, lassen:sich 
einzelne Zeilen einfügen oder 
löschen. Auch Word-Wrapping, 
Blocksatz oder veränderte 
Randeinstellungen lassen sich 
über CTRL-Sequenzen errei- 
chen. Obwohl WORD- 
WRAPPING amZeilenende re- 
lativ langsam ausgeführt wird, 
kann der Text fließend einge- 
geben werden. Dies gilt übri- 
gens auch beim Blocksatz. Di- 
rekt nach der Eingabe einer 
Zeile wird diese formatiert. 


Die Randeinstellung kann im 
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Text mehrmals verändert wer- 
den, wodurch sich beispiels- 
weise Absätze besser hervor- 
heben lassen. Auch die 
BASIC-Editierfunktionen DEL 
und SHIFT DEL lassen sich im 
Textprogramm nutzen. Aller- 
dings lassen sich mit diesen 
Funktionen nur Zeichen inner- 
halb einer Zeile verändern. 
Wird ein Text über den Rand 
aus dem Bildschirm gescho- 
ben, so ist und bleibt er ver- 
schwunden. 


Als bemerkenswert leistungs- 
fähig empfand ich die Such/ 
Ersetzefunktion. Auffällig an 
dieser Funktion ist die unge- 
wöhnliche Schnelligkeit. Wird 
ein Suchbegriff gefunden, so 
wird dieser am Bildschirm an- 
gezeigt und auf eine Bestäti- 
gung gewartet. Betätigt man 
dauernd die J-Taste (Ja), so 
kann man beobachten, wie 
schnell der Suchbegriff ersetzt 
wird. 


Etwas nachteilig machte sich 


im Edit-Modus der doppelte 
Zeilenabstand bemerkbar, 
denn die Übersichtlichkeit wird 
durch den kleinen Bildschirm- 
ausschnitt nicht gerade ver- 
bessert. 


Mit_der Tastenfolge CTRL-X 
gelangt man zurück ins 
Hauptmenü. Von diesem läßt 
sich der Text wahlweise ab- 
speichern oder ausdrucken. 
Zum Ausdrucken des Textes 
läßt sich praktisch jeder 


Drucker verwenden, daein zu- 
sätzliches Drucker-Installa- 
tionsprogramm praktisch jede 
Anpassung erlaubt. Selbst das 
Austauschen von beliebig vie- 
len ASCII-Zeichen läßt sich 
über dieses Installationspro- 
gramm erreichen. 


Besonders nützlich ist eine Op- 
ton zum Belegen der 

“ Funktionstasten. Diese lassen 
sich z.B. mit. Druckercodes 
oder einfachen Textfloskeln be- 
legen. Möchte man einen vor- 
handenen Text editieren, so 
gelangt man über die Option 
TEXT ÄNDERN zurück in den 
Editor. 


Anfangs erwähnten wir bereits 
die Fähigkeit dieser Textverar- 
beitung, Serienbriefe zu erzeu- 





„dadurch schlechte Lesbarkeit 
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gen. Natürlich benötigt man für 
Serienbriefe auch eine Adress- 
datei. Eine solche ist ebenfalls 
im Lieferumfang enthalten. 
Bemerkenswert ist, daß essich 
hier um eine relative Adressda- 
tei handelt. Dies bedeutet, daß 
das Programm direkt auf jeden 
Datensatz zugreifen kann, 
ohne daß die Daten sequeniiell 
geladen werden müssen. Aber 
nicht alle eingebauten Routi- 
nen sind optimiert worden, 
denn es ergibt sich eine relativ 
lange Wartezeit pro Datensat- 
zeingabe. Außerdem ist die 
maximale Anzahl der Adressen 
auf 200 beschränkt. Neben den 
üblichen Datenfeldern wie 
Nachname, Straße usw. stehen 
auch mehrere Felder für Be- 
merkungen zur Verfügung. Um 
später bestimmte Adressen für 


x 
« 
% 
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den Serienbrief selektieren zu 
können, können mehrere von 
insgesamt 10 Kriterien ange- 
wählt werden. Diese 10 Krite- 
rien können frei gewählt wer- 
den, z.B. Berufe wie Program- 
mierer, Koch, Setzer. Natürlich 
läßt sich auch nach einem Kri- 
terium suchen. Auf diese 
Weise läßt sich schnell eine Li- 
ste aller Programmierer oder 
Setzer erstellen. 


Der eigentliche Serienbrief wird 
später über ein drittes Pro- 
gramm erzeugt. Dieses Pro- 
gramm verwendet selektierte 
Adressen in Verbindung mit ei- 
nem anzugebenden Text. 


Fazit: Sicherlich hebt sich die- 
ses Programm aus der Masse 
der üblichen Textprogramme 
ab. Insbesondere Eigenschaf- 
ten wie schnelle Ersetzfunk- 
tion, Blocksatzfunktion sowie 
die Möglichkeit, Serienbriefe 
auszugeben, sprechen für sich. 
Allerdings bleibt das Manko der 
schlechten Lesbarkeit durch 
die 80 Zeichen-Darstellung. 
Frank Brall 


Positiv: 

Vertikal Scrolling, gutes Preis/ 
Leistungsverhältnis, Serien- 
briefe möglich, relative 
Adressverwaltung, umfangrei- 
che Dokumentation. 


Negativ: : 
Schlecht lesbare 80 Zeichen 
Darstellung. 





Programm: Four great Games 
Volume 3 

Hersteller: Micro Value, Eng- 
land 

Vertrieb: Versandhandel R. 
Lindenschmidt 

Preis: ca. 20 DM 

System: C16/116/Plus 4 
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In letzter Zeit kommen immer 
häufiger Sammelkassetten auf 
den Markt. In dieser Ausgabe 
haben wir bereits die dritte 
Folge der Reihe "Four great 
Games”. Häufig handelt es 
sich auf diesen Sammelkasset- 
ten nicht um absolute Spit- 


enspiele. Die Angebote sind 
aber dennoch oft preiswert. 

Auf dieser Kassette sind, wie 
der Name schon sagt, vier 
Spiele enthalten, die ich nun im 
Einzelnen vorstellen möchte. 
Das erste Spiel trägt den Na- 
men "Battle Star” und ist ein 


Sammelkassetten sind in! 


ziemlich müder Abklatsch des 
C64-Renners URIDIUM. Auch 
in "Battle Star” muß man mit 
einem Raumschiff, das in ver- 
schiedene Richtungen gedreht 
werden kann, über eine 
Plattform fliegen und Gegner 
"wegpusten”. Im Gegensatz 
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zum Vorbild URIDIUM sind die ten muß man Pakete, die im ein Labyrinth steuern und 


Grafiken aber recht schlecht. 
Auch das Spielgeschehen 





Battle Star 


selbst reißt einen nicht gerade 
vom Hocker. Die Gegner sind 
irgendwelche undefinierbaren 
winzigen Objekte, die im "Wak- 
kelflug” auf einen zukommen. 
Auf der Piattform selbst sind 
dann noch blinkende Quadrate 
abzuschießen. Auch ist der 
Versuch, die überaus gute An- 
imation des Vorbildes nach- 
zuahmen, gründlich in die 
Hose gegangen. Alles in allem 
ist "Battle Star” höchstens ein 
durchschnittliches Spiel. 


Lunar Docking 


Auch das zweite Spiel, "Lunar 


Docking”, ist nicht gerade ein 
Hammer. Mit einem Astronau- 


Orbit um die Erde treiben, zu 
einem Frachtraumschiff brin- 


gen. Leider ist dies nicht so 
leicht, da allerlei Schrott da 
oben rumtreibt. Meteoriten und 
Satelliten dürfen nicht berührt 
werden, sonst hat man die 
Ehre, von vorn beginnen zu 
dürfen. Auch dieses Spiel ist 
kaum erwähnenswert. 


Future Shock, dies ist der 
Name des dritten Spiels. Hier- 
bei handelt. es sich um das 
wohl beste Spiel auf der Kas- 


HAUE A Box 


ver; 


* 





sette. Man muß einen Glob (ein 
merkwürdiges Lebewesen, das 
sich hopsend fortbewegt) durch 


Symbole aufsammeln. Das 
Problem dabei ist aber, daß 


Future Shock 


man den Glob nur nach links 
oder - rechts steuern kann. 
Kommt man an einen senk- 
rechten Gang, so fällt man 
entweder nach unten, oder 
man schwebt nach oben. Die 
Richtung, in die man sich be- 


wegt, kann man nur dadurch - 


beeinflussen, daß man die 
Symbole aufnimmt. Macht man 
aber dabei einen Fehler, so 
steckt man fest und kommt 
nicht mehr weiter. Hat man ge- 
nügend Teile eingesammelt, so 





Ack-Ack 


kann man daraus mit etwas 
Geschick ein Puzzle 
zusammensetzen. 


Die Steuerung erfolgt leidernur - ‚ 
über die Tastatur. Grafik und 
Animation sind in Ordnung, 





trotzdem hätte hier noch eini- 
ges verbessert werden können. 
So überlagern sich z.B. die 
Sprites. Trotz allem, ”Future 
Shock” macht Spaß. 


So, nun komme ich zum letzten 
Programm der Kassette. Es 
trägt den Namen "ACK-ACK” 
und hat eine wirklich tolle Gra- 
fik aufzuweisen. Man sieht'eine 
schön gezeichnete Bergland- 
schaft, die sich absolut flüssig 


und ruckelfrei von links nach 
rechts und umgekehrt scrollen 
läßt. Darüberhinaus hat man 


# 
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ea nn an dla anal a a Ä  LLLE  E  D en 





ich zerstört werden, bevor sie den 






nach ob en und unten bewegt 
Sn kann..Schießen kann 


man natürlich. auch. Soweit, Zr 


sogut. Wer jetzt aber eine Art: 
3D-Spiel anal hat, der wird 
hi 3 





uscht ‚sein! Kleine ‚feindliche 
Objekte stürzen vom Himmel 
‘und müssen, um die Gefahr 
abzuwenden, beschossen und 





Wennes nach dem Handbuch 
geht, arbeitet bei Script Plus im 
CBM-Modus nur die Breit- 
schrift. (Der NL10 fällt unter die 
Gruppe Null) 
Man kann dem Drucker aber 
trotzdem alle Funktionen ent- 
locken, indem man die Steuer- 
funktionen vorab in anderer 
Weise definiert. Bei meinem 
nachstehend beschriebenen 
Beispiel können folgende 
Schriftarten genutzt werden; 


Breitschrift normal 
Breitschrift kursiv 

NLQ normal 

NLQ kursiv 
Schmalschrift 
Subscript 
Unterstreichen in allen 
Schriftarten 





Eine erfreuliche Nachricht! 
Es gibt eine Adresse bei 
der unser Soundsampler 
steckfertig auf einer Euro- 
paplatine bezogen werden 
kann! 


Geliefert wird das Gerät 
ohne Gehäuse. Im Liefer- 
umfang sind der Sound- 
sampler,; der Userportstek- 
ker sowie die Anschlußka- 
bel enthalten. Der Preis be- 
trägt 87 DM + Porto und 
Nachnahme. Die Lieferzeit 
beträgt, da es sich beim 
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bestimmten Anzahl 


Einstecken - fertig! 


für C16 +64K, C116, Plus4 


Boden erreichen. Nach einer 
abge- 
schossener Objekte, gelangt 
man in das nächste Level. Das 
einzige, was in dem folgenden 
Level dem Spieler seine Auf- 
gabe erschwert, ist die: Zu- 
nahme der angreifenden Ob- 
jekte selbst. Die Spielidee 
selbst und die zu erfüllende 
Aufgabe bleiben unverändert. 


In der Statuszeile eines zu er- 
öffnenden Dokumentes, in der 
die Parameter für linken und 
rechten Rand usw. eingegeben 
werden, müssen, jeweils durch 
Doppelpunkt getrennt, noch 
folgende Parameter eingege- 
ben werden: 


0=14:1=52:2=53:3=15:4= 
80:5=45:6=49:7=48:8=83: 
9=84 


Damit sind die Möglichkeiten 
ausgereizt, denn mehr als zehn 
Parameter lassen sich nicht 
vordefinieren. 

0=14 steht zum Beispiel für 
CHR$ (14) = Breitschrift und gilt 
für den Rest der Zeile. Um die 
Breitschrift einzuschalten, ge- 
nügt an entsprechender Stelle 


Hersteller um eine Privat- 
Person handelt, ca. 2 bis 3 
Wochen. Wir weisen aller- 
dings darauf hin, daß der 
Tronic-Verlag keinerlei Haf- 
tung übernehmen kann. Für 
alle, die den Sampler gerne 
hätten, sich aber nicht an 
den Selbstbau gewagt ha- 
.ben, dürfte dies eine gute 

Nachricht sein! |! 





Hier die Bezugsadresse: 
Peter Scholl 

Leezener Weg 21 
2000 Hamburg 62 















Ich finde, daß.man aus einer so 
guten Hintergrundgrafik mehr 
hätte machen können. Meine 


Motivation zu spielen sank je-- 


denfalls bereits nach kurzer 
Zeit auf den Nullpunkt! 


Zusammenfassend muß ich 


sagen, daß es sich bei ”Four 


great Games Volume 3” um 


eine Sammlung nur mittel- 


ein Druck auf ESC und 0. Die 
0 erscheint dann revers. Für 
die meisten anderen Einstel- 
lungen benötigt ya ren 






sollte die | Finger 
Sapmkng. lassen! 


Otfried Schmich 


Textverarbeitung: Script Plus- Star NL10 


NLQ-Kursiv. ein:ESC+ Shift 


Nul +ESC +1. 


NLQ-Kursiv aus: ESC + Shift 
Null + ESC + 2 





„jetzt auch verschiedene Schrifiarıen 


noch die Escape-Sequenz 
CHR$ (27) und den folgenden 
eigentlichen Steuerbefehl (z.B. 
CHR$ (52) für NLQ-Kursiv). 


CHR$ (27) wird angesprochen 


durch die Eingabe von: ESC + . 


SHIFT NULL (Pfeil). Es er- 
scheint ein reverses E. Im An- 
schluß geben Sie ESC + 1 
(CHR$ (52)) ein. Hinter dem re- 
versen E erscheint eine reverse 
1. Damit - ist. NLQ-Kursiv 
eingschaltet. 


Nachstehend die Tastenfolge 
für alle Einstellungen: 


Breitschrift ein: ESC + NULL 
Breitschrift aus : automatisch 
nächste Zeile 


Schmalschrift ein : ESC + 
Shift Null + ESC + 3 
Schmalschrift aus : ESC + 
Shift Null + ESC + 4 
Unterstreichen ein : ESC + 
Shift Null + ESC + 5 + ESC 
+6 

Unterstreichen aus : ESC + 
Shift Null + ESC + 5 + ESC 
+7 

Subskript ein : ESC + Shift 
Null + ESC +8 +ESC+6 
Subskript aus :ESC + Shirt 
Null +. ESC + 2. 


Es ist ratsam, die Statuszeile 
als "Dokustart”’ abzuspeichern 
und bei Arbeitsbeginn zu la- 
den. Man spart sich Arbeit und. 
vermeidet Eingabefehler. 
Detlef Lokay 
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Tasllteiicelsiel,s, 


Geht die Sonne im Osten auf? 


Die C-16-Besitzer nicht nur in der Bundesrepublik werden’s inzwischen 


schon gemerkt haben. Der Soft 
computer fließt immer dünner. 
er sogar bald ganz versieg 
Softwarehäuser tun noch viel für den 
sen Zungen genannt wird. 
C-16 immer noch in ihrem 


warefluß für diesen ”kleinen” Home- 
Von mehreren Seiten hört man, daß 
t. Weder die deutschen noch die englischen 
”Spar-Amiga”, wie er von bö- 
Lediglich einige Unerschrockene haben den 
Programm. Hier müssen sicherlich die Fir- 


men Tynesoft, Kingsoft und einige andere englische Häuser genannt 
werden. Von denen kommt aber auch immer weniger rüber. Das Ge- 
schäft scheint sich wohl nicht mehr zu lohnen. Oder doch? 


Wenn man den Blick einmal 
über die Grenzen schweifen 
läßt, dann stellt man jedoch 
fest, daß es noch ein paar 
"Oasen” für den C+16 gibt. Und 
die liegen - ob man es nun 
glaubt oder nicht - im Osten, z. 
B. in Ungarn. Denn in den Län- 
dern des Ostblocks haben sich 
‘vor allem die preisgünstigen 
Computer wie Spectrum und 
C-16 verkauft. >: 


Leider gab’s diese Software in 
den hiesigen Läden noch nicht 
zu kaufen. Allerdings wäre es 
sicher zu begrüßen, wenn sich 
die Händler bereitfinden, diese 
Software aus Ungarn zu 
importieren. 

Jetzt sagen Sie sichsicherlich, 
daß da einige Sprachbarrieren 
zu bedenken seien. Ich gebe 
Ihnen Recht. Die Beispiele für 
Ungarische Software, die mir 
vorliegen, sind allerdings so 
geartet, daß man auch ohne 
Sprachkenntnisse mit den Pro- 


grammen was anfangen kann. 


Das Spiel HUNGARORING 
von der Firma ANDROMEDA 
SOFTWARE Ltd.z.B. ist ein Au- 
torennspiel, bei dem man einen 
Formi-eins-Wagen schnellst- 
möglich über einen Kurs steu- 
ern muß. Die Grafik des Spiels 
ist wirklich in Ordnung, und 
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auch sonst kann man das 
Game als technisch ausgereift 
bezeichnen. Per Feuerknopf- 
druck wird bis zum vierten 
Gang hochgeschaltet. Je nach 
Drehzahl wird das Motorenge- 
räusch lauter, und natürlich 
quietschen die Reifen auch or- 
dentlich, wenn man in der 
Kurve an der Bande ent- 
langschrappt. 


Einziges Manko: Man fährt 
praktisch nur gegen die Zeit. 
Auf der ganzen Strecke sind 
weit und breit keine Konkurren- 
ten zu sehen. Das trübt etwas 
den Spielspaß, denn wenn man 
seine Widersacher überholen 
kann, dann ist das Ganze doch 
schon viel spannender. Mit der 
Sprache gibt es keine Pro- 
bleme, denn ”F2 for Training” 
dürfte wohl jeder verstehen. 


Ein zweites Beispiel ist aller- 
dings ganz in Ungarisch gehal- 
ten: SUPER COBRA ist der 
Name des Games von 
NOVOTRADE-OCTASOFT. Es 
handelt sich dabei um ein altes 
Spielprinzip, nämlich das von 
SCRAMBLE. Nur, daß man 
hier einen Hubschrauber fliegt, 
der Ziele am Boden zerstören 
muß und natürlich den vom 


Boden aufsteigenden Raketen 
ausweichen.muß. Das ist wahr- 
lich keine einfache Aufgabe, da 
man natürlich auch nicht ir- 
gendwo an die "Landschaft" 
stoßen darf, sonst zerreißt's 
den Helikopter. 


Bis zu acht Spieler können hier 
mitmachen, und jeder kommt 
in die insgesamt 10 Level, da 
das Weiterkommen nicht von 
den erreichten Punkten ab- 
hängig ist. Vielmehr ist das 
Spiel als eine Art Highscore- 
Wettbewerb zu verstehen, wo 
jeder zusehen muß, in jedem 
Level möglichst viele Punkte zu 
holen. 


Leider kann SUPER COBRA 
nur mit Tastatur gespielt wer- 
den (Cursortasten und 
Leertaste), was das Ganze 
noch erschwert. Denn drücken 
Sie mal auf die richtige Pfeilta- 
ste, wenn es hektisch wird und 
Sie die Finger nicht mehr von 
der Leertaste bekommen. Ab- 
gesehen von der Tastatursteu- 
erung ist dieses Game gut ge- 
macht, und man hat Spaß, 
wenn man mit mehreren Leu- 
ten dransitzt. 5 


Aber auch gute Anwen- 


dungsprogramme gibt's für 


den C-16. BOTTICELLY gehört 
sicher zum Besten, was es auf 
dem C-16/Plus 4 in dieser Rich- 
tung gibt. Kein vergleichbares 
Cad- bzw. Malprogramm ist so 
vielseitig und so leistungsfähig. 
Botticelly arbeitet mit einer Auf- 
lösung von 320 x 210 Punkten 
und besitzt neben dem 
Hauptmenü noch 10 weitere 
Untermenüs, die sich 
folgendermaßen gliedern: 


a) Hauptmenü 


Es können folgende Icons mit 
dem Joystick angewählt wer- 
den: Radieren, Draw, Line, 
Frame, Circle, Fill, Zoom, Edit, 
More, Disk, Second Screen, 
Undo, Color und 15 verschie- 
dene Pinselstärken. 


b) Untermenü (FILL) 


Wird im Hauptmenü das FIEL- 
Icon betätigt, so wird eine Ge- 
samtauswahl von 62 verschie- 
denen Füllmustern angezeigt, 
mit denen man arbeiten kann. 


c) Untermenü (ZOOM) 


Hier wird eine Bildschirmlupe 
zur Verfügung gestellt, mit der 
man einen kleinen Ausschnitt 
des Grafikbildschirms vergrö- 
Bern kann. 


d) Untermenü (EDIT.) 


Das Editormenü wird durch ein 
großes A symbolisiert. Es bringt 
uns in den Texteditor, mit dem 
man Schriftzüge in verschie- 
denen Grössen auf den Grafik- 
bildschirm bringen kann. Des- 
weiteren ist ein CURSOR ein- 
gebaut, mit dem man seine ei- 
genen Zeichensätze entwik- 
kein und absaven kann. 
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e) Untermenü (COPY) 


Als Symbol für dieses Unter- 
menü finden wir "eine große 
Schere.Hier können beliebige 
Bildschirmausschnitte verviel- 
fältigt und in verschiedenen 


Größen auf dem ersten oder . 


zweiten Grafikbildschirm 
wiedergegeben werden. 


f) Untermenü (MORE) 


Hier erhalten wir die Möglich- 
keit, die Grafiken auf dem 
Drucker auszugeben. Auch ist 
eine Rasterfunktion installiert, 
die den Bildschirm in weiße 
und graue Quadrate unterteilt, 
so daß ein genaueres Zeichnen 
ermöglicht wird, also eine Art 
Millimeterpapierfunktion. 


9) Untermenü (DISK) 


Unter diesem Icon finden wir 
alle Diskfunktionen wie z.B. 
SCREEN SAVE/LOAD, CHA- 
RACTERS SAVE/LOAD. 


Botticelly kennt 37 verschie- 
dene Funktionen und verfügt 
über zwei Grafikbildschirme, in 
die beliebig oft gewechselt 


- werden kann. -Die einzelnen 


Funktionen der am oberen 
Bildschirmrand befindlichen 
Statuszeile werden ähnlich wie 
beim Commodore Amiga durch 
Icons mit dem Joystick oder 
der Tastatur angewählt. 
Natürlich kann man erstellte 
Grafiken, um Platz auf der Disk 
zu Sparen, mit dem eingebau- 
ten Compiler von 40 auf 9 
Blocks reduzieren. Diese wer- 
den aber wieder durch ein ex- 
ternes Menü gesaved oder ge- 
laden. Texte können um 90, 
180 oder 270 Grad gedreht auf 
dem Bildschirm wiedergege- 
ben werden. Auch Manipula- 
tionen des Grafikbildschirms 
durch MOVE, INVERS und 
MASK sind möglich. Sollte man 
sich vertan haben, so kann 
man. die letzte Option mit 
UNDO rückgängig machen. 


Hier wurde ein wahres Wun- 
derwerk für die kleinsten 
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. interessanten 


Rechner von Commodpre ge- 
schaffenen, welches sich 
durchaus mit PAINTER mes- 
sen kann. 


Fazit: 


Wie man sieht, könnensich die 
Produkte aus dem Osten 
durchaus mit denen Westeuro- 
pas messen. In Zukunft wird 
man sicherlich noch mehr aus 
den östlichen Nachbarländern 
hören. Und damit sich diese 
Prophezeihung auch erfüllt, 
werden wir Ihnen in der näch- 
sten Normalausgabe; Compute 
mit 8/88, weitere Tests zu 
Freeware- 
Programmen aus dem Ost- 
block vorstellen. 


Freeware-Programme aus Un- 
garn haben inzwischen näm- 
lich auch schon den Weg in die 
BRD gefunden. Somit haben 
auch Sie die Möglichkeit, Ihre 
Programmsammlung zu erwei- 
tern. Zwei Disketten, voll mit 
Freeware aus Ungarn, bietet 
die Firma ELEKTRONIK- 
TECHNIK, Tannenweg 9, 2351 
Trappenkamp (Telefon 04323/ 
3991) an. Der Preis liegt pro 
Diskette bei 29,50 DM, wobei 
zusätzlich Versandkosten von 
6,80 DM pro Lieferung berech- 
net werden. 


Bleibt zum Schluß noch festzu- 
stellen, daß die Software- 
Versorgung des kleinen” 
Commodore immer lückenhaf- 
ter wird. Ob die Software aus 
dem Osten den Programm- 
mangel abdecken kann, das 
sei dahingestellt. Wahrschein- 
lich werden aber generell die 
Quellen, die bisher eigentlich 
nicht so richtig Beachtung ge- 
funden haben, immer.weiter in 
den Vordergrund rücken. Auch 
Public-Domain-Software wird 
sicher eine dieser Quellen 
sein. 


Daß der C-16 eine 
"professionelle” Renaissance 
erleben wird, wage ich ange- 
sichts des offensichtlichen 


REPORT 


Trends hin zu immer größeren, 
leistungsfähigeren Computern 
zu bezweifeln. Der Silberstreif 





befindet sich am östlichen 
Horizont. 
Martina Strack 





Katz und Maus 


Seit einiger Zeit tauchen im- 
mer wieder recht preiswerte 
Mäuse für den C64 oder C128 
im Handel auf. Es reizte mich, 
eines dieser Geräte auch am 
C16/Plus 4 zum Laufen zu 
bringen. Leider fand ich kaum 
Literatur, in der der Joystick- 
Port beschrieben ist. So be- 
sorgte ich mir einige Joystick- 
Adapter, um die Unterschiede 





zwischen den Ports des C16 
und des C64 herauszufinden. 
Der erste große Unterschied 
liegt darin, daß beim C16 die 
einzelnen Kontakte NICHT 
nach Masse geschaltete wer- 
den. Das ist auch der Grund 
dafür, daß Joysticks mit Dau- 
erfeuer nicht am C16 funktio- 
nieren. Die übrige Beschaltung 
des Adapters läßt es daher 
nicht zu, die Versorgungs- 
Spannung (+5V) für die Maus 
über den Joystickport zu be- 
ziehen. Nachdem ich dies fest- 
gestellt hatte, kam mir die Idee, 
der Maus ihre Betriebsspan- 
nung separat zuzuführen. Das 


ein trapezförmiger und ein runder Stecker 


geht sogar verhältnismäßig 
einfach. 


Man nimmt ein kleines Stück 
einer Lochraster-Platine und 
schneidet sich ein Teil mit zwei 
Leiterbahnen zurecht. Danach 
muß am trapezförmigen Ste- 
cker die Umrandung entfernt 
werden, um das Platinenstück 
auf die Stifte 7 und 8 





aufstecken zu können. Diese 
Stifte werden dann vorsichtig 
angelötet. Zur Sicherheit wird 
am runden Stecker noch der 
Pin entfernt, an dem die 5V an- 
liegen (der helle Pin in der 
Zeichnung). An das Pilatinen- 
stück können nun die Drähte 
eines 5V-Steckernetzteils an- 
gelötet werden. 


Natürlich kann keine Maus vom 
Amiga oder Atari ST ange- 
schlossen werden, da diese 
nach einem anderen Prinzip 
arbeiten. 


Bernd Köcher 
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BEE REPORT 





. Für die ."größeren” Commo- 
dore. Computer. (C128, .C64 
usw.) gibt es eine Vielzahl gu- 
ter Programme, Bücher, Zeit- 

. schriften, Spiele usw., während 
es für die kleinen (C16, C116, 
Plus/4) in dieser Hinsicht keine 
so große Auswahl gibt. 


Diese Homecomputer konnten 
gerade in letzter Zeit im Zei- 
chen des Preisverfalls auf dem 
Computermarkt zunehmend 
Käufer gewinnen. Obwohl die 
kleinen Homecomputer :sehr 
verbreitet sind, bietet der 
.Softwaremarkt nur wenig, und 
die Besitzer der kleinen Serie 
greifen daher sehr gern auf 
Listings aus diversen Zeitschrif- 
ten zurück. Außerdem wird hä- 
ufig auf die Möglichkeit 
zurückgegriffen, selber. Pro- 
gramme zu schreiben. Dies ist 
sicher mit ein Grund dafür, daß 
häufig gerade die Besitzer klei- 
ner Homecomputer das Hand- 
werk des Programmierens so 
gut verstehen. 


Mit dem eingebauten Zeichen- 
satz des Computers kann man 
meist nur Blockgrafiken erstel- 
len. Eigene Vorstellungen von 
Spielfiguren oder. anderen Zei- 
chen können nur über einen 
geänderten Zeichensatz reali- 
siert werden. 

Schon viele Artikel wurden 
über Zeichensatzänderung ge- 
schrieben, diese waren aber 
seiten für den Anfänger ver- 
ständlich und nachvollziehbar. 
Dieses Manko möchte ich in 
diesem Kurs für den  Plus/4 
beheben. 


Der Zeichensatz des Plus/4 
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Einteiliger Kurs 


Wie ändere ich den Zeichensatz 
beim Plus 4 in BASIC? 


Hammer und Schraubenzieher benötigen Sie dazu nicht! 


liegt ab der Adresse 53248 im 
ROM. Da das ROM selber nicht 
geändert werden kann, da es 
ein (NUR-LESE-SPEICHER) 
ist, müssen wir den Zeichen- 
satz ins RAM (Schreib-Lese- 
Speicher) kopieren. 


Zuerst wird das BASIC-Ende 
festgelegt mit 
POKE 55,0:POKE 56,248:CLR. 


Die Zahl 248 wird mit 256 mal- 


-genommen und: ergibt‘ die 


Adresse 63488. Mit CLR wer- 
den die Variablen im Speicher 
gelöscht. Durch diese drei Be- 
fehle wird die Kopie vor dem 


Überschreiben geschützt. 


POKE1177,62 schaltet die 
PEEK-ROUTINE auf ROM- 
LESEN. Im Handbuch Seite 
213-214 stehen die Codenr. 0- 
127, die in den Speicher ge- 
pokt werden müssen, um das 
Zeichen auf den Bildschirm zu 
bekommen. Ein’ Zeichen be- 


steht aus 8 Byte, also brauchen" 
wir für 128 Zeichen 1024 Spei- 


Cherstellen. 


Die Kopierschleife setzt sich 
also wie folgt zusammen: 

FOR I=0 TO 1023:POKE 
63488 + 1, PEEK(53248 +1):NE- 








xTI 

Nun stehen ab Adresse 63488 
die Zeichen mit den Coder.O- 
127 und können geändert wer- 
den. Dazu muß auch die 
PEEK-Routine auf RAM- 
LESEN geschaltet werden und 
zwar mit POKE 1177,63. 


Im Handbuch Seite 229 sind 
die: Tedchip-Register. aufge- 
listet, z.B.: Register 18 
(Adresse 65298). Dieses Regi- 
ster ist unter anderem für die 
Umschaltung auf ROM-: oder 
RAM-Lesen zuständig. Ist BIT 
(2) gesetzt, wird aus dem ROM 
gelesen. Da wir den Zeichen- 
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satz nur im RAM ändern kön- 
nen, müssen wir den Rechner 
anweisen, aus dem RAM zu le- 
sen. Dies geschieht, wenn wir 
mit 
POKE65298,192 BIT (2) 
löschen. Register 19 des Ted- 
chip beinhaltet die alte Adresse 
; des Zeichensatzes (53248). Mit 
' POKE 65299,248 schreiben wir 
‚ die neue Adresse des Zeichen- 
. satzes, der ja im RAM steht, ins 
Register 19. 


Nach diesen für das Ver- 
ständnis notwendigen Ausfüh- 
rungen kommen wir zum 


Abhb.d1 > 
En 
I i & 


Klammern 


On ann ann amen. 


(lert) F 18h 54 


eigentlichen ÄNDERN des 
Zeichensatzes. 


Zuerst zeichnen wir uns eine 
8*8 Matrix auf ein Blatt Papier 
(z.B. kariertes wie Abbildung 1) 


In Abb.1 ist das Zeichen mit der 
Codenr. (27) dargestellt. Ein 
Byte kann max. den Wert 255 
darstellen. Mit diesem Wert wä- 
ren alle Bits gesetzt. In unse- 
rem Zeichen hat Bytenr. 1 den 
Wert 60, da nur Bit 2-5 gesetzt 
worden sind. Bytenummer 
2=Bit4-5=Wort48 usw. bis 
Bytenr. 8. 


m 


ER 


32% 6 
ar 


REPORT EN 


Nehmen wir die so erhaltenen 
Werte aus der Matrix und legen 
sie in Data-Zeilen ab, angefan- 
gen mit Bytenr. 1-8, so ergibt 
sich folgende Datazeile: 

DATA 60,48,48,48,48,48,60,00 


In Abbildung 2 werden wir ein 
eigenes Zeichen definieren 
und in einer Data-Zeile able- 
gen. 


Die in Abb.2 ermittelten Daten 
werden nun in. der richtigen 
Reihenfolge beginnend immer 
mit Bytenr. 1 als Datazeile ab- 
gelegt. Also sieht unsere Zeile, 


E03 O4. mr 
au 0 eK = 
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Byte Iikk..„ bo... EXXKBKKE RK HI.. 


er ib Ce 





wie folgt aus: 
DATA 28,62,111,255,31 ‚255, 
126,60 


Zum Einbinden der Zeile in ein 
Programm benötigen wir nur 


‘noch die Einleseschleife, und 


die sieht in BASIC so aus: 
FOR I=216 TO 223: READ A: 
POKE 63488 + 1,A:NEXT I 
Der Befehl READ liest die 
Werte aus der Datazeile und 
ordnet sie der Variablen A zu. 


Woher weiß ich, welches Zei- 
chen wo im Speicher steht. Wie 
schon erwähnt, besteht jedes 


lat rar 
Byte Zrk..k..EXZBEKR..6b..b..k.. -- "data 4s- w 
Iyte Ir kuch.. BRIFRR EG. HF: ——cata 4 
Byte bb. .b.. BIKE b..6b..kbu..k.. - data ds" 
Eyte She..Eu.FXKRRKR..b..B..k.. --kdata ı 
Byte Shk..E..FKKFEIR. 6 b..b..&b,.. -—- "data Je 
Byte 7eRhk..B..EKKEKEKREKBEKE -— data en 
Eyte 8 er re Be 0 re ee me data Gum 
ja u nn a Fr a m nn a rn a a a nn a nn a a an 
bb. 3 
Pen 
Bit (bert) FIZBRSAIFTZERISFÖSFOÖSF OFF ÖL 


Bit-Nummer 


u 22 WE Ze U Ze Zu EZ 


ram ann ne nen mt an an mr de ann ar aan ori om Arm Jane ran mn en san ann nr rn Pr m pr rn nn m m m m pr an m am ra aM A a hen rar nn rn ame apa aa pt na THF 


Eyte ikk..E..B..FREZbRIbKEb..b..  --:>data 
Eyta Zbhb..B..EBXKBRKKERKRF RER... ST r>datba 
Byte Dbb..FYIRFKKb..0ba.EXKbKKENKK --bdatba 
Byte 4b bEERBKKREKEKK EEK eK ek ek lat 
Byte Sb... Fo.bB..EKZFRKKE KK EN m :dat a 
Byia GbREKRRKKEEK RK KK eK "data 
Bye hd... BOER TOR Kk RX KA HI. . rd 
Bye © fe 2; Pr SEE SE 2 2 2 2 2 2 en 
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EEE REPORT. 


Zeichen aus 8 Bits, so daß wir 
für ein Zeichen 8 Speicherstel- 
len benötigen. Die Anfangs- 
adresse im RAM ist somit 
63488. Also steht das Zeichen 
der Codenummer O0 in den 
Speicherstellen 63488-63494. 
Rechnet man z.B. Codezahl 
27*8+63488, so erhält man 
die Anfangs-Adresse für das 
Zeichen in Abb. 1., nämlich 
63704. Die Endadresse wäre 
demnach 63704+7. Da nicht 
alle Zeichen geändert werden 
müssen, um eigene Spielfigu- 
ren oder sonstige Grafikzei- 
chen zu entwerfen, sollte man 
möglichst fortlaufende Code- 
zahlen verwenden. Dadurch 
brauchen nicht so viele Einie- 
seschleifen konstruiert werden. 


- Einige wichtige Anmerkungen 
sollen ebenfalls noch in diesem 


Kurs gemacht werden und hel- 
ten, Fehler zu vermeiden: 

1. Der Grafikmodus kann nicht 
benutzt werden. 

2. Die Commodore-Taste muß 
gesperrt werden. 

3. Da die Änderung von Basic 
aus läuft , nimmt sie mehr Zeit 
in Anspruch als in reiner Ma- 
schinensprache. (Der Kurs ist 
ja auch vorrangig für erste An- 
fänge gedacht!) 


Zur besseren Anschaulichkeit 
fasse ich alle gelieferten Infor- 
mationen noch einmal in einem 
kleinen Programm zusammen. 
Die Zeilennummern können 
beliebig geändert werden. 


10 POKE 55,0:POKE56,248: 
CLR :REM BASIC ENDE 
FESTLEGEN 

20 POKE 1177,62 :REM PEEK- 


ROUTINE AUF ROM LESEN 
UMSCHALTEN 

30 POKE. 1351,128 :REM 
COMMODORE-TASTE 
SPERREN 

40 FOR I=0 TO 1023:POKE 
63488 +1, PEEK(53248 +1): 
REM KOPIER SCHLEIFE 

50 NEXT I 

60 POKE 1177,63: REM PEEK- 
ROUTINE AUF RAM LESEN 
UMSCHALTEN 

70 POKE 65299,248:REM AN- 
FANGSADRESSE ZEICHEN- 
SATZ 63488 

80 POKE  65298,192:REM 
TED-CHIP RAM STATT ROM 
LESEN 

90 FOR I=216 TO 223:READ 
A: POKE 63488 + 1,A:REM 
EINLESESCHLEIFE 

100 NEXT I: REM ZEICHEN- 
DATAS, CODE 27 
(27*8=216)+7=223 


110 DATA28,62,111,255,31, 
255,126,60: REM NEUE DA- 
TEN 

120 SCNCLR 


Nachdem Sie dies kurze Pro- 
gramm eingetippt haben, drü- 
cken Sie SHIFT und die Taste 
mit der eckigen Klammer 
(links). Das neue Zeichen er- 
scheint auf dem Bildschirm. 
Ebenso mit dem Befehl PRINT 
CHR$ (91) oder 

CHAR,5,5,CHR$(91) oder 
POKE (Bildschirmadresse),27. 


Zurück zum normalen Zei- 
chensatz kommt man mit 
POKE 65299,208:POKE 
65298,196. Die Commodore- 
Taste wird wieder mit POKE 
1351,0 eingeschaltet. 


Hans-Jürgen Schloßarek 


Disk-Duplicator nun auch 


für Floppy 1541! 





Einige Leser, vornehmlich die, 
die eine Floppy 1541 besitzen, 
werden sich darüber gewun- 
dert haben, daß der Disk- 





Duplicator nicht funktioniert. 
Das lag daran, daß dieses Pro- 
gramm ursprünglich für die Zeilen neu eingegeben zu wer- 
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1551 
wurde. Deshalb bringen wir 
diesmal ein Update, mit dem es 
auch auf der 1541 funktioniert. 


Floppy geschrieben 


Im MC-Teil des Programmes 
brauchen nur die abgedruckten 


den, und schon funktioniert 
es auch beim 1541. 


Noch etwas. Einige Leser ha- 
ben versucht, kopiergeschützte 
Disketten zu duplizieren. Dabei 
kann man aber böse Überra- 
schungen erleben! Das Pro- 
gramm ist nur für UNGE- 
SCHUTZTE Disketten zu 
verwenden! 


Hier sind die Änderungen: 


15E0 EO 0D DO F5 20 CC FF 
A2 ::A4 


15E8 0520 C6FFA0O0020CF 
::08 
15F0 FF 78 8D 3F FF 91 DA8D 
56 
15F8 3E FF 58C8 DO F020CC 
61 


1600 FF 60 18 F8 A9 01 65 D9 
«DB 


1690 1B 17 A205 20C9 FFAO 
1:38 


1698 00 78 8D 3F FF Bi E38D 
"FF 


16A0 3E FF 58 20 D2FFC8DO 
:86 


16A8 FO20CC FFA20F20C9 
"FA 


16B0 FF A2 00 BD 10 1720 D2 
47 


16B8 FF E8 E0 0D DO F5 4C 
CC ::B3 | 
16C0 FF 18 F8 A901 65 E2 85 
4A 

Viel Erfolg und Vorsicht beim 
Kopieren vor kopierge- 
schützten Disketten! 
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T.8. Datensysteme-Vertriebsgesellschaft slolz 


19,90 


Musicsynthesize, 


29,90 Kikstart 


Summer ı Events 


one? 


‚go 29,90 


Alle Preise sind Ladenpreise. Bei Versand per Nachnahme berechnen wir Porto 5,90 DM, bei Vorkasse mit 


Scheck 2,50 DM. Zum Bestellen einfach ankreuzen und abschicken! 


0917 1/28 8295 


SRunmEnanasenenemnnnnn en nen nme unn nun un nme nnEEEn Ten Summen EEE Tannen nun nn n nn Sn nn nun nn OO n EEE — SE nUEn LEN ES EnEET Inn En Sn men SE En En On SED OS nn monuonunn sen mn nun 


Power-Hit- "Bestellung C-16 


D Joystick Adapter 
OD Speichererweiterung 
DO Breirn great Games 


D Adress (deutsch) 

DO Aliens UK 

D Atlantis 

OD) Auf Wiedersehen Monty 
D Auriga 

OD Bandits at Zero 

DO) World Series Baseball 
OD Battle 

DO Battlestar 

DO Berks 

DO Berks Trilogy 

OD Big Mac 

D BMX-Racer 

D BMX-Simulator 

DO) Bounder/Planetsearch 
D Bubble Trouble 

OD) Championship Wrestling 
D Classics Il 

D Classics Ill 

ED 10 Computerhits Ill 
D 10 Computerhits IV 
D Datei (deutsch) 

OD) Datenbank 

D Death Race 16 

D Defence 16 

DO] Demolition 

DO Dirty Den 

D Dizasterblaster 

DO Dork’s Dilemma 

DO) European Games 

DO) Finders Keepers 

D Fingers Malone 

D Five Star Games I 

OD Five Star Games H 

DO Five Star Games Hl 
D Flight Path 737 

DD Footballer of the Year 
DO Football Manager 

©) Formula One 

OD Frank Bruno’s Boxing 
D Freneis 

O Future Knights 

DO Future Shock 

OD Galaxions 

DO) Games Pack I 

D Games Pack Ii 

OD) Grandmaster Chess 


Denisstraße 45, 8500 Nürnberg, Tel. 09 11 / 28 82 86 


8,90 
79,90 
15,90 
35,90 
29,90 
25,90 
14,90 


SEONNEHEBLELEHDELnFER 
EEEEEEEEEESEEgEg gg gg 8 


-BPRPRPrDrRPRID 
DD0X 


29,90 


DO Greatest Hits 

DO Gullwing Falcon 
D Gun Law 

O Gwnn 

D Hektik 

DO Hercules 

OD) Home Office 

OD International Karate 
U Into the Deep 

DO Jet Brix 

D Jet Set Willy I 

DO Jet Set Willy Il 

D Kikstart B 

DO Killapede 

OD King Size 50 Games 
D Knock Out 

DO) Kung Fu Kid 

D Las Vegas Video Poker 
DO) Lawn Tennis 

OD Leapin’ Louie 

U] Manic Miner 

D Masterchess 

O Matrix and Laserzone 
OU) Megabolts 

OD Molecule Man 

OD) Monkey Magic 

DO Mr. Puniverse 

OD) Musicsynthesizer 
DO Ninja Master 

OD Oblido 

DO Omnibus 1 

OD Omnibus 2 

OD One Man and his Droid 
OD Panic Penguin 

DO Paperboy 

D) Phantom 

DO Pin Point 

OD P.O.D. 

U] Pogo Pete 

OD Powerball 

OD Power Pack I 

D Power Pack (neu) 
D Project Nova 

OD Prospector Pete 
D Rescue from Zylon 
OD) Rockman 

DO Saboteur 

OD Scooby Doo 

OD Sky Hawk 

D Slippery Sid 

OD) Snooker & Pool 


29,90 


D Spectipede 
DO) Speed King 
DO Spore 
O Sport 4 
DO Sqij 
D Squirm 
D Star Commander 
D Star Events 
I Starforce Nova 
DO Steve Davis Snooker 
D Storm 
DO Street Olympics 
DO) Summer Events 
DO Superhits 
Tazz 
D Terra Nova 
DO Text (deutsch) 
OD Thai Boxing 
DO The Magician's Curse 
D The Return of Rockman 


DO) The Wizzard and Prinzess 


D Thrust 

DO) Tomb of Tarrabash 
DO Trailblazer 

D Triple Decker 1 

DO Triple Decker 2 

DO Trizons 


. T,$. Datensysteme, Denisstr. 45, 8500 Nürnberg 80 


‚Absender 


Name, Vorname 


Straße, Hausnummer 


PLZ, Or 


D_D. » 


ERILITITEITITTI III LURTERILT 
EEE+2 7272777770777 77 7777 7777 


OD) Turbo Accounts (deutsch) 

DO Turbo Calce - 

O Turbo-Tape 

O Tutti Frutti 

OU Tycoon Tex 

DO Utility (deutsch) 

OD) Vegas Jackpot 

OD Video Meanies 

DO) Vokabel (deutsch) 

DO) Wimbledon 

DO) Winter Events 

OD) Winter Olympics 

OD) World Cup Garnival 

D Xadium 

E] Xargon Wars 

DO Yie Ar Kung Fu 
Zip 


Für Plus 4 (erweiterter C-16) 


DA.C.E. II 

DO Kroesus 

DO Air Combat Emulator 
DO Jump Jet 

DO Strip Poker 
DA.C.E. 

OD) Mercenary 


Unterschrift 


S888EE55EEEEEEEEE5 


Disk 39,90 











BEEE PROGRAMME 


Achtung Samsound! 


An alle Leser, die unseren Sound-Digitizer nachgebaut haben! 


In der letzten Ausgabe hatten 
wir jaschon eine Korrektur ver- 
öffentlicht mit dem Hinweis, 
daß das Gerät mit der Ande- 
rung einwandfrei funktioniere. 
Diese frohe Botschaft kamlei- 
der verfrüht, denn noch ein 
Fehler hatte sich in die Schal- 
tung eingeschlichen. 


Die noch notwendige Korrektur 
bezieht sich ebenfalls auf die 
Belegung der User-Port-Buch- 
se. Dort kommt zweimal der 
Punkt ”k” vor. Das ist natürlich 
falsch, denn der zweite Punkt 
”k” muß der Punkt ”f” sein. 
Ohne diese Korrektur arbeitet 
das Gerät zwar auch, die Qua- 
lität der Samples ist aber durch 
das doppelt vorkommende er- 
ste Bit sehr schlecht. Beschä- 
digungen des IC ZN 427 
können durch diesen Fehler 
aber nicht entstehen! 


Die Beschriftung des Verbin- 
dungskabels war leider auch 
verkehrt, nämlich spiegelbild- 


lich, was zahlreiche Leser aber 
schon bemerkt haben. Werden 
diese Korrekturen vorgenom- 
men und wird das Gerät an- 
sonsten fehlerfrei nachgebaut, 
so besitzen Sie einen wirklich 
professionellen Sound- 
Sampler, der es in der Qualität 
des Klanges durchaus mit ge- 
kauften Geräten aufnehmen 
kann. 


Wir bitten alle Leser, die durch 
die abgedruckten Fehler in 
Schwierigkeiten kamen, hier- 
mit vielmals um Entschuldi- 
gung, es soll nicht mehr 
vorkommen! 


So, nun noch eine Korrektur, 
die die Software für den Digiti- 
zer betrifft: Auch hier ist ein 
Fehler passiert, auf den uns 
der Autor des Beitrages, Herr 
Axel Borchmann, aufmerksam 
machte. Aus irgendeinem un- 
erfindlichen Grund wurde das 
Programm "DEMO.BAS’”nicht 
richtig abgedruckt. Wir bringen 
daher in dieser Ausgabe die 


Ener Wunsch: 


richtige Version. Bei der Ein- 
gabe dieses Programmes ge- 
hen Sie bitte genau wie in der 
alten Anleitung vor. Damit sind 
Sie nun endlich in der Lage, 
lauffähige Demos zu erstellen. 


Das Listing: 
>1808 88 OF 19 64 98 E7 38 2C 
>ıaea 31 3A E7 34 2C 31 88 45 
>10198 18 GE 08 99 28 22 13 i3 
>1818 93 81 11 11 11 11 11 11. 
31020 11 11 2@ 28 28 28 29 26 
>1028 28 2A 2A 2n 2A 28 31:32 
»1039 33 34 35° 36 37 38: 39 3@ 
>ı638 31 32 33 34 35 36 28 2A 
>1648 2A 2A 2A 22 86 7C 10 78 
»ı848 88 99 2a 22 11 11 11 il 
>105@ 11 95 54 48 49 53.20 44 
>1858 45 AD AF 28 53 
»ı068 43 52 45 41 54 45 44 
>ı106a 57 49 54 48 20 53 41 


57 41 2& 
28 


4D 


Das Terminalprogramm für den + 4 


Endlich ist es soweit. 

Zahlreiche Leser fragten immer 
wieder und sehr eindringlich 
nach einem Terminalpro- 
gramm für den Plus4. Wir ha- 
ben uns bemüht, ein solches 
speziell für unsere Leser ent- 
wickeln zu lassen. Nun endlich 
können wir Ihren Wunsch erfül- 
len und ein Terminalprogramm 
für den Plus4 veröffentlichen. 


Bevor ich’ genauer auf das Pro- 
gramm eingehe, möchte ich 
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noch einmal dem Autor Martin 
Mehlhouse für das Programm 
danken. Martin hat über unsere 
MAILBOX (die TRONIC-MAIL- 
BOX) erfahren, daß wir ein 
Terminalprogramm dringend 
suchen. Ohne zu zögern, hat er 
sich an die Arbeit gemacht und 
ein spezielles Programm für 
uns entwickelt. Das prächtige 
Ergebnis ist ein Terminalpro- 
gramm, daß in reiner Maschi- 
nensprache . geschrieben ist 
und selbst von professionellen 


Terminalprogrammen anderer 
Systeme kaum überboten wird. 


Funktionsbeschreibung: 
Nachdem das generierte Ter- 
minalprogramm mit RUN ge- 
startet ist, erscheint das 
Hauptmenü von Teleterm: 


1. Parametereinstellung 
2. Online 

3. Lesen von Disk 

4. Ende 


>1078 53 4F 
>1078 2E 3@ 22 88 AD 10 82 88 
1089 99 20 22 11 28 53 41 40 
>1038 53 AF 55 4E 44 28 67 41 
>1099 53 24 57 52 49 54 54 45 
>1AS8 4E 2@ 42 59 28 41 58 46 
>198A@ AC 42 AF 52 43 48 4D. 
>ıaAB 41 4E 4E 22 98 DD 18. 8C 
»ıara 2@ 22 11 11 29 28 
>1888 28 28 20 2@ 26 56 
yıaca 52 2a 41 4E 59 
>ıaca 2@ 54 4F 26 
>ı208 54 41 52 54 22 Ai 
>1008 "24 08 E7 
>ı0E8 34: 34 
>10E8 FO 
>ıura 
>18F8 


55 4E 44 20 66 31 


48 45 59 


41 


© 
» 


2a 
53 
F3 
CY) 
eo 
ea 
oa 
>1183 08 
1198 88 
1118 80 
>1118 88 
>1128 88 
>1128 08 
>1139 08 
>1138 88 
>1148 08 
>1148 08 
>1150 88 
Iy1158 A9 
>1168 78 
‚>i1168 88 
>117@ 11 
131178 11 
>1188 
')1188: 4A 
31198 
>1198 
!>11AQ@ 29 97 
I>11A8. 
1>11B@ 11 
I>11R8 sE 82 11 
$ııce 
111C8 


218883383883388388 
333333333833835 5 
s233338333383838 85> 


2983.85 7888888338888 38 


8 
853833833388 88838 88 


a 
RB 
. 


33 08 e8 


5. Text in Puffer laden 
6. Directory 


Obwohl das Programm voll- 
kommen menügesteuert arbei- 
tet, hier eine kurze Erläuterung 
der einzelnen Optionen: 


1. Einstellen der Parameter 


Um mit jeder beliebigen Mail- 
box Verbindung aufnehmen zu 
können, müssen bekanntlich 
die Übertragungsparameter 
übereinstimmen. Für diesen 
Zweck erlaubt Teleterm die 
Einstellung der Datenbits (8/7), 
der Stopbits (1/2), der Parität 
(gerade Parität/ungerade Pari- 
tät/keine Parität). Die Baudrate 
ist nicht veränderbar, 'sie 
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ist konstant mit 300 Baud de- 
finiert. 1200 Baud wären zwar 
theoretisch denkbar, jedoch 
dürften wohl nur die allerwe- 
nigsten einen 1200 Baud Aku- 
stikkoppler besitzen. 


2. Online 

. Diesist natürlich die wichtigste 
Option. Über sie läuft die Auf- 
nahme der-Verbindung. Zuerst 
fragt das Programm nach dem 
Filenamen, unter dem er den 
Dialog abspeichern soll. Um 
den Datenaustausch nicht un- 
nötig zu verlangsamen, nutzt 
das Programm den gesamten 
freien Speicherraum des PLUS 
4 zum Puffern des Dialogs. Ist 
der Pufferspeicher voll oder 
wird die Verbindung durch Fi 
beendet, so werden die Daten 
abgespeichert. Auch bei die- 
sem Speichervorgang gehen 
keine Daten verloren, denn der 
Dialog wird durch CHR$ (19) 
gestoppt bzw. später durch 
CHR$ (17) wieder freigegeben. 
Ein besonderes Feature von 
'Teleterm ist die Umwandlung 
von IBM-Umlauten. Schaltet 
man diese Funktion über die 
Taste F2 ein, so werden alle 
IBM-Umlaute in AE, UE, OE 
usw. umgewandelt. Dies ist be- 
sonders bei unserer Mailbox 
sinnvoll, denn einige Hilfstexte 
verwenden die IBM-Umlaute. 


Mit F3 läßt sich diese Funktion 
übrigens jederzeit wieder aus- 
schalten. Im ONLINE-MODUS 
wird auch der bekannte Bell- 
Code CHR$ (7) erkannt und als 
Soundbefehl ausgeführt. Durch 
das Betätigen der Taste F8 
(Help) wird ein in den Puffer ge- 
ladener Text an die Box über- 
tragen! Der Rechner kann 
ebenfalls durch CHR$ (19) ge- 
stoppt und durch CHR$(17) 
wieder aktiviert werden. Letzte- 
res ist sinnvoll, wenn die Mail- 
box nicht die schnellste ist und 
einmal eine Pause zum Laden 
bzw. Saven von Daten benö- 
tigt. .Der. Betriebsstatus- wird 
durch die Rahmenfarbe ange- 
zeigt (Schwarz = Normal; Blau 
= Floppy läuft; Rot = Online- 
modus). : 
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Dies garantiert die Übersicht 
bei der Arbeit. £ 


3. Lesen von Disk 


Über diese Funktion kann ein . 


abgespeicherter Dialog ange- 
zeigt werden. Über die Taste 
SPACE kann der Dialog prak- 
tisch in Einzelschritten ausge- 
führt werden. 


4. Ende/Aus/Quit 

Über diese Funktion kann, wie 
nicht anders zu erwarten, das 
Programm verlasssen werden. 


5. ASCII Text in Puffer laden 
Möchte man einen längeren 
Text in eine Box.übertragen, so 
ist es sinnvoll, diesen Text vor- 
zubereiten. Zum Vorbereiten 
des Textes kann praktisch je- 
des beliebige Textprogramm 
bzw. jeder Editor. verwendet 
werden, der echten ASCiIl- 
Code erzeugt. Natürlich lassen 
sich über eine einfache 
OPEN/CMD-Sequenz auch Lis- 
tings in den Puffer laden. Der 
Puffer läßt sich später auf 
Knopfdruck übertragen. 


6. Directory 

Mit dieser Option kann man 
sich schnell und einfach eine 
Übersicht über die Diskettenfi- 
les verschaffen. : 


PROGR 


Hinweise für deninteressierten 
Programmierer 


Teleterm wurde mit dem be- 
kannten Tronic-Assembler Ge- 
nesis entwickelt. Die Gesamt- 
länge des Programmes beträgt 
10 Diskettenblocks. Hier die 
komplette Speicheraufteilung: 
$1001-$ 173E Maschinenpro- 
gramm 

$ 173F-$ 193E Zeichentabellen 
enden&empfangen 

$193F-$ FCFF Benutzerspei- 
cher ca. 58000 Bytes 


Hinweise zum Abtippen: 


Um das Abtippen möglichst 
einfach zu gestalten, wird das 
Programm in Form eines 
BASIC-LOADERSs abgedruckt. 
Dieser BASIC-LOADER kann 
also bequem mit dem Check- 
summer OV20 eingegeben 
werden. Nachdem man das 
Programm gestartet hat, wird 
automatisch ein Maschinen- 
programm erzeugt. Dieses wird 
jedoch so generiert, daß es wie 
ein BASIC-Programm mit 
SAVE abgespeichert werden 
kann. Da das Maschinenpro- 
gramm eine eingebaute 


Basic-Zeile besitzt, kann es mit 
RUN aktiviert werden. 





Erforderliche Hardware: 


Um das Terminalprogramm 
nutzen zu können, sind zwei 
Peripheriegeräte. notwendig, 
die Diskettenstation und ein 
Akustikkoppler. 


Bei vielen Plus 4 Besitzern 
herrscht Unklarheit darüber, 
was für ein Akustikkoppler für 
den Plus 4 verwendet werden 
kann. Die Antwort ist ganz ein- _ 
fach. Im Prinzip läßt sich jeder 
Akustikkoppler verwenden, der 
eine genormte RS232 besitzt. 
Da heute fast alle Akustikkop- 
pler eine RS232 besitzen, ist 
die: Auswahl entsprechend 
groß. Im Test verwendeten wir 
beispielsweise das Dataphon, 
einen preisgünstigen und SOo- 
gleich leistungsstarken Kop- 
pler. Obwohl die genormte 
RS232 eigentlich mit Span- 
nungen von -12 und +12 Volt 
arbeitet, zeigte sich im Test das 
+5V und 0V durchaus ausrei- 
chen. Zwar ist auf eine 
Interface-Schaltung nicht zu 
verzichten, jedoch ist ein zu- 
sätzliches Netzteil nicht not- 
wendig. Die Interface-Schal- 
tung ist so einfach aufgebaut, 
daß selbst Einsteiger keine 
Probleme haben dürften, die 
Schaltung nachzubauen. 





BEE PROGRAMME 


Stückliste: D:X-EB OBJ 


BD —nn 
1 Userport Stecker ne 3: 


(links im Plan) "TO RSZ32 INTERFACE PLUS-H4 


















ED a a ua 
1 RS 232 Stecker 11“ =. 2 
(rechts im Plan) OB 1299 
= ri -i eG 2 
1 PNP Transistor BC558 B je ur 
D a eg i) BC 558B 
1 NPN Transistor BC238-240 C ee 
Alle Widerstände 5 kOhm K 
Alle Dioden 1N4148 oder Fr, 4 
1N4001 
rn 
Elko 47 UF 25 Volt 7 
Ü 
C-16 LISTING + CHECKSUMMEN (OC V1.0) 147 DATA37,EB,20,CC,FF,A2,08,28,.03D7 <64> 
- 148 DATAC9,FF,90,03,4C,3C,15,A5,039D <49> 
100 REM * <105> | 149 DATAD2,8D,36,11,A5,D3,8D,37,83E2 <166> 
101 REM * * - <198> | 150 DATA11,78,8D,3F,FF,AD,80,80,0381 <43> 
102 REM * TELETERM V 4.0 “ <89> | 151 DATA8D,3E,FF,58,20,D2,FF,20,0433 <239> 
193 REM * 5 * <200> | 152 DATAB7,FF,F0,03,4C,3C,15,E6,042C <67> 
104 REM * (C) TRONICVERLAG ESCHWEGE * <128> | 153 DATAD2,D®,02,E6.D3,A5,D2,CD,05A1 <14> 
105 REM * “ <20@2> | 154 DATAF8,10,D0,D3,A5,D3,CD,F9,05E9 <35> 
106 REM * (W) VON M.MEHLHOSE “ <180> | 155 DATA10,D®,CC,A5,DD,85,D2,8D, 0512 <163> 
107 REM * “ <204> | 156 DATAF8,10,A5,DE,85,D3,8D,F9,0569 <20> 
108 REM Wo . <113> | 157 DATA10,A9,B6,8D,19,FF,20,CC, 0400 <243> 
109 : <167> | 158 DATAFF,A2,02,20,C9,FF,A9,11,0445 <232> 
110 : <168> | 159 DATA20,37,EB,4C,CC,FF,20,A8,0421 <162> 
117-; <169> | 160 DATAD8,A9,0D,20,49,DC,A0,11,0384 <217> 
112 DATA00,25,10,C4,07,9E,34,31,.0203 <170> | 161 DATAA9,94,20,88,90,A9,16.85,03B9 <79> 
113 DATA35,30,3A,8F,298,54,45,4C,0233 <48> | 162 DATAD4,4C,52,12,11,11,11,11,01C8 <123> 
114 DATA45,54,45,52,4D,20,56,34,0227 <175> | 163 DATA11,1D,41,4E,5A,41,48,4C,®1EC <206> 
115 DATA2E,30,20,56,4F,4E,20,4F,®1E® <162> | 164 DATA20,44,45,52,20,44,41,54,01F4 <90> 
116 DATA53,43,41,52,00,00,00,00,0129 <144> | 165 DATA45,4E,42,49,54,53,20,28,0820D <200> 
117 DATA00,00,00,00,00.00,00,09,0000 <136> | 166 DATA37,2F,38,29,3A,00,00,0D,®1®E <201> 
118 DATA0®,00,00.00,00,00,20,F4,0114 <182> | 167 DATAQD,20,41,4E,5A,41,48,4C,®1EB <121> 
119 DATA16,20,70,DE,20,8A,D8,A9,®3AF <208> | 168 DATA28,44,45,52,20,53,54,4F,0211 <193> 
120 DATA3E,85,DD,A9,19,85,DE,A2,0467 <231> | 169 DATASQ,42,49,54,53,20,28,31,01FB <13> 
121 DATA0®,8A,9D,5F,05,E8,E0,87,03DA <7> 170 DATA2F,32,29,20,3A,00,00,0D,00F1 <35> 
122 DATADY,F8,A5,DD?8D,F8,10,A5,0584 <100> | 171 DATAOD,31,2E,20,4B,45,49,4E,81B3 <161> 
123 DATADE,8D,F9,10,4C,9E,14,A9, 041B : <98> | 172 DATA45,20,.20,20,20,50,41,52,01A8 <94> 
124 DATAO2,A2,02,A0,02,20,BA,FF, 0321 <128> | 173 DATA49,54,41,45,54,20.0D,32,01D6 <91> 
125 DATAA9,00,20,BD,FF,20,C0,FF, 0464 <65> | 174 DATA2E,20,47,45,52,41,44,45,01F6 <56> 
126 DATA78,A5,D4,8D,03,FD,A5,D5,04F8 <254> | 175 DATA20,290,20,50,41,52,49,54,01E® <30> 
! 127 DATA8D,02,FD,58,60,4C,9E,14,0342 <178> | 176 DATA41,45,54,20,0D,33,2E.20,0188 <233) 
128 DATAA2,02,280,C9,FF,B0.15,20,0371 <161> | 177 DATA55,4E,47,45,52,41,44,45,024B <24> 
! 129 DATAE4,FF,C9,01,90,0E,48,A9,043C <231> | 178 DATA20,590,41,52,49,54,41,45,0226. <11> 
i 130 DATA32,8D,19,FF,68,AA,BD,3E, 03E4 <13> | 179 DATA54,0D,0D,49,48,52,45,20,01B6 <113> 
| 131 DATA17,20,37,EB,20,CC,FF,60,03A4 <51> | 180 DATA57,41,48,4C,20,20,20,20,01AC <42> 
| 132 DATAA2,02,20,C6,FF,2@0,CF,FF,0477 <227> | 181 DATA20,20,3A,00,00,12,20.46,00F2 <114) 
133 DATAC9,01,90,23,20,78,16, AA, 02D5 <44> | 182 DATA49,4C,45,20,49,53,54,20,020A <40> 
134 DATAA9,B6,8D,19,FF,BD,3E,18,0417 <246> | 183 DATAAF,46,46,45,4E,20,21,20,®1CF <183> 
135 DATAF®,15,85,DC,20,49,DC,28,03CB <212> | 184 DATA92,0D,00,46,49,4C,45,4E,020D <175> 
136 DATACC,FF,A5,DC,78,8D,3F,FF,0858F <36> | 185 DATA41,4D,45,20,3F,20,20,3A,@1AC <127> 
137 DATA20,F7,10,8D,3E,FF,58,20,0369 <39> | 186 DATAO®,00,20,E4,FF.C9,38,F0.03F4 <98> 
138 DATACC,FF,AD,F8,10,C9,FF,D®,0618 <ı103> | 187 DATA15.C9.37,F0,03,4C,52,12,02B8 <111> 
139 DATA®A,AD,F9,10,C9,FC,D0,03,0458 <191> | 188 DATAA5,DA,49,20,85,D4,A9,37,041B < 2343 
140 DATA20,08,11,60,A9,02,20,C3,0227 <29> | 189 DATA20,49,DC,4C,73,12,A9,38,02F7 <188> 
141 DATAFF,78,8D,3F,FF,A9,00,20,040B <99> | 198 DATA20,49,DC,A9,B7,A0,11,20,0376 <49> 
142 DATAF7,18,8D,3E,FF,58,60,8D,0416 <161> | 191 DATA88,90,20,E4,FF,C9,31,.F0, 0585 <20> 
143 DATA00,80,EE,F8,10,D®,083,EE,0437 <136> | 192 DATA15,C9,32,F0,03,4C,7A,12,02DB <4> 
144 DATAF9,10,60,A9,46,8D,19,FF,®3FD <16@> | 193 DATAA5,D4,45,80,85,D4,A9,32,0472 <109> 
It 145 DATAA5,DD,85.D2,A5.DE,85,D3,05B4 <41> | 194 DATA20,49,DC,4C,9B,12,A9,31,0318 <2> 
| 146 DATAA2,02,20,.C9,FF,A9,13,20,0368 <201> | 195 DATA20,49,DC,A9,05,85,D5,A9,03F6 <138> 
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196 
197 
198 
199 
200 
201 
202 
203 
204 
285 
286 
207 
208 
209 
210 
211 
212 
213 
214 
215 
216 
217 
218 
219 
220 
221 
222 
223 
224 
225 
226 
227 
228 
229 
230 

231 
232 
233 

- 234 
235 
236 
237 
238 
239 
240 
241 
242 
243 
244 
245 
246 
247 
248 
249 
258 
251 
252 
253 
254 
255 
256 
257 
258 
259 
260 
261 
262 
263 
264 
265 
266 
267 
268 
269 
270 
271 
272 


DATAD7,A®,11,20,88,90,208,E4,03C4 
DATAFF,C9,31,F0,27,C9,32,F®,04FB 
DATA07,C9,33,F0,11,4C,A6,12,0308 
DATAA5,D5,49,C0,85,D5,A9,32,04B8 
DATA20,49,DC,4C,D9,12,A5,D5,83F6 
DATA49,80,85,D5,A9,33,20,49,0368 
DATADC,4C,D9,12,A9,31,20,49,08356 
DATADC, 20,E4,FF,C9,20,D0,F9,0591 
DATAA9,0D,20,49,DC,60,A9,43,0347 
DATAAQ,12,20,88,90,A2,00,20,02AC 
DATACF,FF,9D,5E,06,E8,C9,6D,848D 
DATAD®,F5,CA,A9,2C,9D,5E,06,0465 
DATAE8,A9,53,9D,5E,06,E8,A9, 0476 
DATA2C,9D,5E,06,E8,A9,57,9D, 03B2 
DATASE, 06,E8,86,D7,A9,08,A2,03FC 
DATA08,A0,08,20,BA,FF,A5.,D7, 0405 
DATAA0,06,A2,5E,20,BD,FF,4C,®3CE 
DATACO,FF,20,CC,FF,A9,08,20,047B 
DATAC3,FF,60,20,F4,16,20,E4,045® 
DATA19,20,E6,12,20,5F,10,20,01D7 
DATAA0,10,20,80,10,A5,C6,C9,0394 
DATA05,D®,03,20,0D,17,C9,06, d1EB 
DATAD®,03,20,25,17,C9,03,F0,02EB 
DATA6A,C9,04,F0,13,4C,3F,13,02D8 
DATA2@,F8,15,4C,3F,13,20,CC,02B7 
DATAFF,20,2A,13,20,E4,10,60,02D8 
DATA20,08,11,4C,66,13,20,3A,0158 
DATAFB,A9,43,A0,12,20,88,90,03D1 
DATAA2,00,20,CF,FF,9D,5E,06.0391 


DATAE8,C9,0D,D0,F5,CA,A9, 2C, 0522 


DATA9D, SE, 06,E8,A9,53,9D,5E, 03E® 
DATA6,E8,A9,2C,9D,5SE,06,E8,83AC 
DATAA9,52,9D,5E,06,E8,86,D7,0441 
DATAA9,08,A2,08,A0,08,20,BA,02DD 
DATAFF,A5,D7,A0,06,A2,5E,20,0441 
DATABD,FF,20,C0,FF,90,03,4C,047A 
DATA3C,15,60,4C,F8,15,20,3A,0264 
DATAFB,A9,00,A2,08,AB,6F,20,037D 
DATABA,FF,A9,00,20,BD,FF', 20,045E 
DATACO,FF,A2.00,20,C6,FF,20,0466 
DATACF,FF,C9,0D,F®,07,20,49,0404 
DATADC,4C,DF,13,EA,20,CC,FF,04EF 
DATA20,3A,FB,A9,00,4C,C3,FF,040C 
DATA93,0E,05,20,D4,45,4C,45,0270 
DATAS4,45,52,4D,20,D6,34,2E,0298 
DATA30,20,2D,20,56,4F,4E,20,01B® 
DATACF,D3,C3,C1,D2,20,20,20,0458 
DATA®D,0D,0D,12,20,31,20,92,013C 
DATA20,20.20,D0,41,52,41,4D,0251 
DATA45,54,45,52,57,41,48,4C,025C 
DATA®D,0D,12,20,32,20,92,20,0150 
DATA28,20,CF,4E,4C,49,4E,45,0285 
DATA4D,4F,44,55,53,0D,®D,12,01B4 
DATA20,33,20,92,20,20,20,CC,0231 
DATA45,53,45,4E,20,56,4F,4E,023E 
DATA20,C4,49,53,4B,0D,0D,12,01F'7 
DATA20,34,20,92,20,20,20,C5,022B 
DATA4E,44,45,0D,0D,12,20,35,0158 
DATA20,92,20,20,20,D4,45,58,0283 
DATA54,20,49,4E,20,D0,55,46,0296 
DATA46,45,52,20,4C,45,53,45,0226 
DATA4E,0D,0D,12,20,36,20,92,0182 
DATA20,20,20,C4,49,52,45,43,0247 
DATA54,4F,52,59,0D,00,A9,F®,02F4 
DATA8D,15,FF,8D,19,FF,A9,F8,04E7 


DATAA,13,20,88,90,20,E4,FF,03EE _ 


DATAF®,FB,C9,31,90,F7,C9,31,0566 
DATAD0,06,20,7E,11,4C,9E,14,0283 
DATAC9,32,D0,06,20,33,13,4C, 0283 
DATA9E,14,C9,33,D0,06,20,F5,0399 
DATA14,4C,9E,14,C9,34,D®,10,82EF 
DATA4C,77,16,20,C6,13,20,E4,02D6 
DATAFF,C9,20,D0,F9,4C,9E,14,04AF 
DATAC9,35,D0,03,4C,65,15,298,02B7 
DATABC,C8,4C,DE,14,20,76,13,036B 
DATAA2,08,20,C6,FF,20,CF,FF,047D 
DATA85,DC,20,B7,FF,D0,35,A5,04E1 
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<85> 
<150> 
<177> 
<10> 
<192> 
<199> 
<121> 
<196> 
<24> 
<5> 
<98> 
<122> 
<188> 
<125> 
<101> 
<220> 
<32> 
<22> 
<160> 
<76> 
<75> 
<133> 
<170> 
<100> 
<47> 
<13> 
<207> 
<216> 
<154> 
793 
<183> 
<98> 
<98> 
<229> 
<87> 
<196> 
<11> 
<34> 
<226> 
<241> 
<32> 
<14> 
<229> 
<125> 
<101> 
<168> 
12 
<175> 
<65> 
<246) 
<10> 
<93> 
<235> 
<70> 
<254> 
<60> 
<208> 
<149> 
<133> 
<212> 
<54> 
<194> 
<597 
<235> 
<42> 
<186> 
<27> 
<200> 
<201> 
<4a1> 
<165> 
<43> 
<14>. 
<12> 
<137> 
<12> 
<142> 


273 
274 


=2:75 


276 
277 
278 
279 
280 
281 
282 
283 
284 
285 
286 
287 
288 
289 
298 
291 
292 
293 
294 
295 
296 
297 
298 
299 
308 
301 
302 
303 
304 
305 
306 
307 
308 
309 
318 
311 
312 
313 
314 
315 
316 
317 
318 
319 
320 
321 
322 
323 
324 
325 
326 
327 
328 
329 
338 
331 
332 
333 
334 
335 
336 
337 
338 
339 
3408 
341 
342 
343 
344 
345 
346 
347 
348 
349 


PROGRAMME EEE 


DATADC,28,49,DC,20,E1,FF,F®,0511 
DATAQE,AS,C6,C9,40,F0,F5,20,0487 
DATAB7,FF,F®,E1,4C,66,13,28,046C 
DATA4F,FF,8D,0D,12,D3,54,4F,02F® 
DATASO, 20,.2D,20,D4,45,58,54,0282 
DATA92,0D,00,28,2A,13,208,E4,0208 
DATAFF,F®,FB,68,A9,08,20,C3, 04DE 
DATAFF,20,CC,FF,20,4F,FF,0D‘, 0465 
DATAOD,12,20,44,49,53,4B,46,01B® 
DATA45,48,4C,45,52,20,92,0D,022F 
DATAOD,00,20,DB,14,20,E4,FF,031F 
DATAC9,2D,D®,F9,60,20,76,.13,03A8 
DATAA9,3E,85,DD,A9,19,85,DE, 046E 
DATAA2,08,20,C6,FF,20,CF,FF,047D 
DATA48,A5,DD,8D,85,15,A5,DE, 0474 
DATA8D,86,15,68,8D,00,80,E6,0383 
DATADD,D®,02,E6,DE,A5,DE,C9, 05BF 
DATAEC,D,03,4C,2A,13,20,B7,031F 
DATAFF,F®,DA,20,2A,13,20,4F,0395 
DATAFF,0D,D4,45,58,54,4C,41,035E 
DATA45,4E,47,45,20,20,3A,00,0199 
DATA38,AS,DD,8D,F8,1®,E9,3E,0476 
DATA48,A5,DE,8D,F9,10,E9,19,0463 
DATA85,DC,68,AA,A5,DC,20,5F,0473 
DATAA4,20,3A,FB,20,4F,FF,C3,042A 
DATA41,50,34,55,52,45,53,50,0274 
DATA2E,20,20,3A,00,38,A9,FF,0288 
DATAES,DD,48,A9,FC,ES,DE,85,05F7 
DATADC,68,AA,A5,DC,20,5F,A4,0492 
DATA28,E4,FF,F®,FB,4C,9E,14,B4EC 
DATAA9,3E,85,DF,A9,19,85,E0,0472 
DATA20,3A,FB,A2,02,20,C9,FF,03E1 
DATAA5,DF,8D,17,16,A5,E0,8D, 0450 
DATA18,16,78,8D,3F,FF,AE,00,031F 


DATA80,8D,3E,FF,58,86,DC,BD,04C1- 


DATA3E,17,F0,03,20,37,EB,20,02AA 
DATACC,FF,A2,02,20,C6,FF,20,0474 
DATACF,FF,C9,13,F0,37,AA,BD.0538 
DATA3E,18,F0,10,48,20,49,DC,02E3 
DATA68,78,8D,3F,FF,20,F7,10,03D2 
DATA8D, 3E,FF,58,A5,DF,C5,DD, 0548 
DATAD®,0F,A5,E0,C5,DE,D®,09,04E0d 
DATA20,CC,FF,20,3A,FB,4C,3F,03CB 
DATA13,E6,DF,D0,05,E6,E0,20,0493 
DATACC,FF,4C,03,16,20,CF,FF,041E 
DATAC9,11,D0,F9,4C,36,16,60,039B 
DATAEA,C9,84,D0,0D,A9,61,20,043E 
DATAAF,10,A9,65,20,AF,10,A9,0355 
DATA®0,68,C9,8E,D0,0D,A9,C1,03FE 
DATA2@,AF,10,A9,65,20,AF,18,02CC 
DATAA9,00,60,C9,94,D®,0D,A9, 03EC 
DATA6F,20,AF,10,A9,65,20,AF,032B 
DATA10,A9,00,60,C9,99,D®,0D, 0358 
DATAA9,CF,20,AF,10,A9,65,20,0385 
DATAAF,10,A9,00,60,C9,81,D0,03E2 
DATAOD,A9,75,20,AF,10,A9,65,0318 
DATA20,AF,10,A9,00,60,C9,9A,034B 
DATAD®,0D,A9,D5,20,AF,10,A9,03E3 
DATA65,20,AF,10,A9,00,60,C9,0316 
DATAE1,D®,0D,A9,73,20,AF,10,03B9 
DATAA9,73,20,AF,10,A9,00,60,0304 
DATAC9,07,D8,18,A2,08,20,C0,0342 
DATAB8,A9,01,85,80,A9,FF,85,0494 
DATA7E,A9,FE,85,7F,A9,00,A0,0472 
DATA®@A,20,61.B8,60,A9,EA,8D, 23C3 
DATA78,16,20,4F,FF,0D,12,55,027® 
DATA4D,4C,41,55,54,45,3A,41, 0243 
DATA4E,92,0D,00,698,A9,60,8D,02E3 
DATA78,16,20,4F,FF,0D,12,55,0278 
DATA4D,4C,41,55,54,45,3A,41,0243 
DATA55,53,92,0D,00,60,00,01,01A8 
DATA02,03,04,05,06,07,08,09,002C 
DATAQA,0B,0C,0D,8E,0F,10,11,006C 
DATA12,13,08,15,16,17,18,19,00A8 
DATA1A,1B,1C,1D,1E,1F,20.21,08EC 
DATA22,23,24,25,26,27,28,29,012C 
DATA2A,2B,2C,2D,2E,2F,30,31,016C 


<148> 
(247) 
<216> 
<128> 
<56> 

<211> 
<194> 
<216> 
<249> 
<236> 
<136> 
<219> 
<158> 
<27> 
<173> 
<218> 
<223> 
< 227) 
<54> 
<54> 
<164> 
x160> 
<250> 
<69> 
<240> 
<167> 
<101> 
<39 > 
<26> 

<206> 
<220> 
<31> 
<200> 
<191> 
<178> 
<168> 
<111) 
<155> 
<204> 
<157> 
<188> 
<217> 
<54> 

<215> 
<88> 

<3> 

<80> 

<190> 
<40> 

<205> 
<214> 
<144> 
<41> 
<239> 
<46> 

<79> 
<58> 
<31> 
<114> 
<4> 

<198> 
<76> 

<148> 
<157> 
<117> 
<2> 

<255> 
<156> 


52 


<2> 
<86> 
<155> 
<128> 
<154> 
<138> 
<130> 
<103> 


19 








— nn ee 


EEE PROGRAMME 


350 DATAI32,33,34,35,36,37,38,39,@1AC <149> 
351 DATA3A,3B,3C,3D. 3E,3F,498,61,020C <110> 
352 DATA62,63,64,65,66,67,68,69,032C <76> 

353° DATA6A,6B,6C,6D,6E,6F,70.71,0836C <49> 

354 DATA72,73,74,75,76,77,78,79,03AC <86> 

355 DATA7A,5B,5C,5D,5E.5F,00,0®,024B <73> 

356 DATA00,00,00,00.00,900,00,00,0098 <120> 
357 DATA00,00,00,.00,20,00,00.00,0008 121? 
358 DATA00,00,09,00,00,00,00.00,0090 <122> 
359 DATA00,00,00,00.00,00.00,00,0009 <123> 
360 DATA0,00,00,10,00.00,00,00,0010 <163> 
361 DATA00,00,00.00,00,80,00,08,0000 <125> 
362 DATA10,00,00,00,00.00,00,00,00108 <156> 
363 DATA00,00,00,00,00,00,09,00,0000 <127> 
364 DATA00,00,00,00,00,09,00,00,00080 <128> 
365 DATA®0,00,00,00,09,098,00,00,.0008 <129> 
366 DATA00,00,00,00,00,00,00,00.0008 <130> 
367 DATA00,00,00,.00,00,00,00,41,0041 <132> 
368 DATA42,43,44,45,46,47,48,49,022C <121> 
369 DATA4A,4B,4C,4D,4E,4F,50,51.026C <94> 

370 DATA52,53,54,55,56,57,58,59, ®2AC <131> 
371 DATA5A,00,00,00,00,09,00,00,005A <61> 

372 DATA0,00,00,00,00,00,00,00,0008 <136> 
373 DATA00,00,08,09,00,090,00,08,000® <137> 
374 DATA00,00.00,00,00,80,09,00,0008 <138> 
375 DATA00,08,090,00,00,09,00,00,.0088 <139> 
376 DATA00,03,00,00,00,090,14,090,0017 <2377 
377 DATA00,00,00,0D.00,00,92,11,00B® <130> 
378 DATA00,00,00.00,00,00,18,00,0018 <78> 

379 DATA09,00,00,00,00,00,20,21,0041 <138> 
380 DATA22,23,24,25,26,27,28,29,012C <162> 
381 DATA2A,2B,2C,2D,2E,2F,30.31,016C <135> 
382 DATA32,33,34,35,36,37,38,39,01AC <172> 
383 DATA3A,3B,3C,3D,3E,3F,40,C1,026C <972 

384 DATAC2,C3,C4,C5,C6,C7,C8.C9,862C <209> 
385 DATACA,CB,CC,CD,CE,CF,D®,D1,066C <1827 
386 DATAD2,D3,D4,D5,D6,D7,D8,D9,B6AC <219> 
387 DATADA,5B,5C,5D,5E,5F,00,41,@2EC <240> 
388 DATA42,43,44,45,46,47,48,49,022C <141> 
389 DATA4A,4B,4C,4D,4E,4F,50,51,026C <114> 
396 DATA52,53,54,55,56,57,58,59,02AC <151> 
391 DATA5SA,00,00,00,00,00,00,00,005A <81> 

392 DATAQ0,03,00,00,00,08,14.,08,0017 <253> 
393 DATA0®,00,08,0D,00,00,92,11,00B® <146> 
394 DATA0®,13,00,00,00,00,18,00,002B <179> 





395 DATA0®,00,00,00,00,00,20,21,9041 <154> 
396 DATA22,23;24,25,26,27,28,29,012C <178> 
397 DATA2A,2B,2C,2D,2E,2F,30,31,016C <151> 
398 DATA32,33,34,35,36,37,38,39, @1AC <188> 
399 DATA3A,3B,3C,3D,3E,3F,40,C1,026C <113) 
400 DATAC2,C3,C4,C5,C6,C7,C8,C9,062C (225) 
401 DATACA,CB,CC,CD,CE,CF,D0,D1,066C <198> 
482 DATAD2,D3,D4,D5,D6.D7,D8,D9,@6AC <235> 
403 DATADA,5B,5C,5D,5E,5F,00,41,®2EC <a> 
404 DATA42,43,44,45,46,47,48,49,022C <157> 
405 DATA4A,4B,4C,4D,4E,4F,50,51,026C <130> 
406 DATA52,53,54,55,56.57,58,59.02AC <167) 
407 DATASA,00.00,00,00,00,00,44,009E <1> 
408 : <211> 
409 PRINT:PRINT"TELETERM{ SPACE} V4.0{ SPACE) -{ 
SPACE}DATALADER{SPACE}-{ SPACE) . . . {SPACEYTAST ER 
E" < 

410 GETKEYAS <129> 
411 SCNCLR: FORZ=0T0295::PS=9 <157> 
412 FORI=0TO7 :READA$:A=DEC (A$) :PS=PS+A <8> 
413 AD=AD+1:NEXTI:READPS$ <236> 
414 IFPS=DEC(PS$)THEN417 - <82> 
415 PRINT"EIN{SPACE)YTIPPFEHLER{ SPACE} IN{ SPAC 
EIZEILE{ SPACE)NR"; <241) 
416 PRINTPEEK (63) +256*PEEK (64) : PRINT: END <48> 
417 PRINTCHR$ (19) " { SPACE4}DAS ( SPACE) PRG( SPAC 
E)PRUEFT { SPACE) ZEILE( SPACE} NUMMER" ; PEEK (63) + 
256*PEEK (64) <204> 
418 NEXTZ <217> 
419 PRINT"DATAS{SPACEISIND{ SPACE)OK{ SPACEYUN 

D{ SPACE}WERDEN{ SPACE} JETZT{SPACE}YEINGELE-" <245) 
428 PRINT"SEN." <23> 
421 RESTORE:AD=4896 <a1> 
422 FORZ=0T0295:PS=® <204> 
423 FORI-9T07 :READA$: A=DEC (A$) <62> 
424 POKEAD,A:AD=AD+1:NEXTI:READPS$ <5> 
425 NEXTZ <224> 
426 PRINT <68> 
427 PRINT"SPEICHER{ SPACE) DEN{ SPACEYMASCHINEN 

CODE{ SPACE} JETZT" : ".€88> 
428 PRINT" (SPACE}DSAVE' TELETERM{ SPACE} V4.0' { 
SPACEYAB! " <137> 
429 POKE45,63:POKE46,25:CLR:END <215> 


“ 


ENDE DES LISTINGS 


Startadressen-Lister 


(für C16/116/Plus 4 mit Floppy 1541/1551/1571) 


Die Anfangsadressen aller auf 
einer Disk gespeicherten Pro: 
gramme können mit diesem Li- 
ster ausgegeben werden. 
Neben .den -Anfangsadressen 
werden auch der erste Track 
‘und Sektor des Programms 


. ausgedruckt. Ignoriert werden 


bei der Ausgabe alle sonstigen 
Dateien wie SEQ, REL und 
USR. 


- Zuerst müssen Sie den Basic- 


Lader eintippen und abspei- 


20 


chern und im Anschluß das 
Programm mit RUN starten. 


Durch das Starten wird der ei- 
gentliche Startadressen-Lister 
erzeugt und gleichzeitig das 
Basic-Programm zerstört. Hat 
alles. richtig funktioniert und 
gibt man nach: der 'READY- 
Meldung LIST ein, so muß fol- 
gende Basic-Zeile erscheinen: 


1988 SYS4150: REM STAR- 
TADRESSENLISTER 


Ist dieser Schritt gelungen, so 
kann das fertige Programm wie 
ein normales Basic-Programm 
unter beliebigem Namen ab- 
gespeichert werden. Wenn Sie 
jetzt eine Diskette überprüfen 
wollen, dann .wird zuerst das 
Programm geladen. Nun legen 
Sie die zu prüfende Disk ein 
und starten den Lister mit 
RUN. Besitzer der Floppys 


1551 oder 1571 sollten jetzt 


nicht erschrecken, denn die 


Geräusche, die die Floppy nun . 


von sich gibt, klingen fast so, 
als würde die Diskette forma- 
tiert. Das ist aber normal und 
kommt dadurch zustande, daß 
der Schreib-Lese-Kopf ständig 
neu. positioniert werden muß. 


Die Anfangsadressen der Pro- 
gramme stehen nämlich nicht 
im Directory, sondern am An- 
fang der Programme selbst, so 
daß jedes Programm extra an- 
gefahren werden muß. Der An- 
zeigevorgang kann mit CTRL-S 
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gestoppt und mit einer beliebi- 
gen Taste fortgeführt werden. 


C16/116/Plus 4 
$4001 : Basic-Start beim Plus 





_ PROGRAMME N 




























Drückt man am Ende des Vor- 4 mit eingeschalteter Grafik £ as BB =: sıara 
gangs SPACE, so wird das $1E21 : Quelltext eines mit re 
Programm beendet. GENESIS geschriebenen ee: 21888 

Assembler-Listings A 
Der Startadressen-Lister eignet $0800 : Basic-Start des C64 RE 14 ERS 8 Ssıası 
sich hervorragend, wenn es $1C01 : Basic-Start des C128 g3 38 BRE a siaat 
darum geht, unbekannte Dis- $C000 Meistens MC- 20 89 DER a 
ketten auf verwertbare Pro- Programme für den C64 5 53 58 ‚2 rast 
gramme zu untersuchen. = I 5 

Alle anderen sind in der Regel Se Su Sasnt 
Noch einige Hinweise zu den MC-Programme oder HIRES- Eee 4 Ss 

















Startadressen: Grafiken und müssen absolut 
geladen werden (LOAD”NA- 
$1001 : Basic-Stat des ME”,8(,1),1). . 
und: 1043 DATA52,11,A6,D7,20,45,11,20,9276 <236> 
BERBSRITe 1044 DATASF,A4,20,52,11,4C.6C.11,024F <84> 
1045 DATA20,CC,FF,68,20,4F,FF,50,0409 <15> 
C-16 LISTING + CHECKSUMMEN (OC V1.0) 1046 DATA52,47,00,A5,D6,C9,C2,D0,046F <205> 
1047 DATA®B,A9,3C,20,D2,FF,20,52,0353 <255> 
LO0 BEMERKTE R RER NW PETE RE EEIRIER <211> | 1048 DATA11,4C,8A,11,20,52,11,20,019B <183> 
110 REM * <207> | 10849 DATA52,11,A0,1C,84,DE,B1,DC,040E <26> 
120 REM * STARTADRESSENLISTER C16 « <71> | 1050 DATAC9,64,B0,03,20,52,11,14,0307 <29> 
130 REM * ® <227> | 1051 DATADE,B1,DC,C9,0A,B0,03,20,0411 <196> 
148 REM * (C) TRONICVERLAG ESCHWEGE x <164) | 10852 DATA52,11,A4,DE,B1,DC,AA,A9,04C5 <176> 
150 REM * Le (2479 | 10853 DATAQ0,20,5F,A4,20,52,11,12,0248 <26> 
160 REM * (W) VON M.MEHLHOSE “ <64> | 1054 DATAOF,20,C9,FF,A2,00,BD,9E,03F4 <112> 
170 REM * = <11> | 1055 DATA10,20,D2,FF,E8,E0,07,D0,04A® <152> 
TOVAREM SEE WEN AIR ER EEE ERETENERER <35> | 1056 DATAF5,A9,00,A6,D8,20,5F,A4,043F :<9> 
190 : <248) | 1857 DATA20,52,11,A9,00,A6,D7,20,02C9 <198> 
‚ 1000 DATA00,1B,10,C4,07,9E,34,31,01F9 <105> | 1058 DATASF,A4,20,3A,FB,20,CC,FF, 0443 <155> 
"1001 DATA35,30,3A,8F,20,53,54,41,0236 «63> | 1059 DATAA9,20,20,D2,FF,20,52,11,033D <203> 
1002 DATA52,54,41,44,52,45,53,53,0268 < 236? | 1868 DATAA2,05,20,C6,EF,20,.CF,FF,047A <187> 
1083 DATA45,4E,00,00,00,09,00,00,0093 <253> | 1061 DATA20,CF,FF,20,CF,FF,85,DA,053B <87> 
1084 DATA®,00,00,00,00,00,00,00,00908 <2> 1062 DATA2®,CF,FF,85,DB,20,CC,FF,0539 <107> 
1005 DATA20,00,00,08,00,00,08,00,0900 692 1063 DATA20,4F,FF,20,24,00,A5,DB, 0332 <214> 
1006 DATA0D,00,00.00,20,00,A9,00,00A9 <246) | 1064 DATA20,10,FB,A5,DA,20,18,FB,03D5 <154> 
1007 DATA8D,E6,07,20,4F,FF,93,12,038D <102> | 19065 DATA4C,3A,FB,18,A5,DC,69,20,03A3 <125> 
1008 DATA29,4E,41,4D,45,20,20.28,01A1 <240> | 10866 DATA85,DC,A5,DD,69,00,85,DD,@4AE <248> 
1009 DATA20,290,20,29,29,20,298,29,0108 <234> | 1067 DATA60,A2,00,86,DF,20,FC,10,90393 <213> 
1010 DATA54,52,20,53,45,20,54,59,022B . <206> | 1068 DATA20,0B,12,E6,DF,A5,DF,C9,044F <30> 
1011 DATA5®,20,290,4C,41,45,4E,47,01F7 <125> | 1069 DATA®7,D®,F2,A9,02,85,DC,A9,047E <181> 
1012 DATA45,20,20,41,44,52,20,20,019C <244) | 1070 DATA3F,85,.DD,A5,D0,C9,12,D®,04C1 <194> 
1013 DATA92,0D,0D,00,A9,02,8D,E6,82CA <214? | 1071 DATA®3,4C,B4,10,A9,05,20,C3,02A4 <14> 
1014 DATA07,A9,02,85,DC,A9,3F,85,038® <181> | 1972 DATAFF,A9,0F,20,C3,FF,20,E4,049D <108> 
1015 DATADD,A9,12,85,D0,A9,01,85,041C <121> | 10873 DATAFF,FO,FB,A9,00.8D,E6,07,050D <34> 
1016 DATAD1,A9,@F,A2,08,A®,0F,20,0302 <125) | 1074 DATA60,2C,30,30,2C,30,30,41,01B9 <62> 
1017 DATABA,FF,A9,00,20,BD,FF,20,045E <244> | 10808 SCNCLR: FORZ=0T074:PS=® <1903> 
1018 DATACO,FF,A9,95,A2,08,A9,05,03BC <21> 1890 FORE=0T07 :READA$:A=DEC (A$) <212> 
1019 DATA20,BA,FF,4C,A6,10,55,31,0361 <244> | 11090 PS=PS+A :NEXTE: READPS$ <154> 
1020 DATA20,35,20,30,20,23,A2,00,018A <78> | 1110 SU=DEC(PS$) <47> 
1821 DATAA9,01,A2.A5,A0,10,20,BD,037E <2> 1120 IFPS< >SUTHEN13098 <77> 
1022 DATAFF,20,C®,FF,A2,0F,20,C9,0478 <131> | 1138 PRINTCHR$ (19) :PRINT:PRINT <79> 
1023 DATAFF,A2,80,BD,9E,19,20,D2,®3FE <162> | 1140 PRINT"DAS( SPACE} PRG { SPACE} PRUEFT { SPACE} 
1024 DATAFF,E8,E®,07,D9,F5;A6,D®,0689 <71> ZEILE{ SPACE}NR{ SPACE} :"; <36> 
1025 DATAA9,00,20,5F,A4,A9,20,20,02B5 <166> | 1158 PRINTPEEK (63) +256*PEEK (64) <39> 
1026 DATAD2,FF,A6,D1,A9,00,20,5F,0478 <47> 1288 NEXTZ:GOTO1328 <193> 
1027 DATAA4,A9,0D, 20,D2,FF,208,CC,0437 <5> 1308 PRINT" TIPPFEHLER{ SPACE} IN{ SPACE} ZEILE(S 
1028 DATAFF,A2,05,20,C6,FF,A2,00,042D " <249> | PACE}NR{SPACEY:"; <ı111> 
1829 DATA28,CF,FF,9D,®0,3F,E8,28,03D2 <192> | 1319 PRINTPEEK (63) +256*PEEK (64) : END <162> 
1030 DATAB7,FF,C9,49,D0,F2,20,CC,056D <39> | 1328 PRINTCHR$ (13) "DATAS({ SPACE} SIND{ SPACE}OK 
‚1031 DATAFF,4C,19,12,EA,AD,00,3F, B34C : <1212 | (SPACEYUND{ SPACE)" '<133> 
1032 DATA85,D®,AD,01,3F,85,D1,A2,043A <73> | 13380 PRINT'WERDEN{SPACE}EINGELESEN." <253> 
1033 DATAO®,8A,A8,B1,DC,85,D6,C9,04E3 <17> | 1340 RESTORE: AD=4096 : FORZ=8T074 <245> 
1034 DATA82,F®,07,C9,C2,F0,03,4C,0443 <85> | 1358 FORE=0T07 :READA$:POKEAD,DEC(A$) <126> 
.:1035-.DATA68,11,E8,8A,A8,B1,DC,85,04A5 <55> | 1360 AD=AD+1:NEXTE: READA$ :NEXTZ <138> 
1036 DATAD8,E8,8A,A8,B1,DC,85,D7,05DB <227> | 137@ POKE: 45,81: POKE46,18:CLR - .<129> 
1037 DATAE8,8A,A8,B1,DC,28,D2,FF,0598 <28> 1380 PRINT"SPEICHER ( SPACE}DAS{ SPACE} PROGRAMM ; 
1038 DATAE8,E®,12,D0,F4,A9,20,20,0487 <102> | (SPACEYMIT" <153> 
1039 DATAD2,FF,A6,D8,20,45,11,28,03E5 <127> | 1398 PRINT"DSAVE"CHR$ (34) "STARTADRESS" ; <170> 
1040 DATASF,A4,4C,57,11,8A,C9,0A,0314 <191> | 1488 PRINT"ENLISTER"CHR$ (34) "(SPACEZ}AB! " <149> 
1041 DATABO,05,A9,30,20,D2,FF,A9,0428 <105> ERS 
DATA00,60,A9,20,4C,D2,FF,20,0366 <94>_ ENDE DES LISTINGS 
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EEE PROGRAMME 


Briefe mit Pfiff. 


für C16/116/Plus 4 mit Floppy 


Mit FUNNY LETTER können 
Sie auf eine neue Art Briefe mit 
dem Rechner schreiben und 
diese als Programm abspei- 
chern. Dies wurde dadurch ge- 
löst, daß sich der C16 (Plus 4) 
jeden Tastendruck merkt und 
später beim Schreiben des 
Textes all das auf den 
Bildschirm wiederholt, was Sie 
zuvor an Tasten gedrückt ha- 
ben. Auch die Befehle von 
Steuertasten wie das Ändern 
der Farbe, das Betätigen einer 
Cursor-Taste oder das Löschen 
des Bildschirms werden ausge- 
führt. 


Dazu ein Beispiel: Nehmen wir 
einmal an, Sie schreiben in der 
zweiten Bildschirmzeile ein 
Wort unabsichtlich (oder auch 
absichtlich) falsch. Sie merken 
dies nicht und schreiben wei- 
ter. Dann, in Zeile 11 endlich, 
fällt Ihnen der Fehler auf. Was 
tun Sie? Na klar, Sie betätigen 
die Cursor-Tasten, fahren mit 
dem Cursor zum Fehler, korri- 
gieren diesen, fahren wieder 
nach unten und schreiben wei- 
ter. Wenn Sie fertig sind und 
den Brief als Programm ab- 


speichern und anschließend 
laufen lassen, dann wird Ihre 
Fehlerkorrektur vom Pro- 
gramm wiederholt! Ist doch toll, 
oder? 


Die Benutzung: Nach dem 
Start von FUNNY LETTER ste- 
hen Ihnen weiterhin sämtliche 
Editier-Funktionen des C16 zur 
Verfügung, auch die ESC- 
Funktionen. Sie schreiben also 
ganz normal Ihren Text. Sind 
Sie damit fertig, dann drücken 





Sie bitte die STOP-Taste. Da- 
durch wird der Bildschirm ge- 
löscht, und in der oberen 
Bildschirmzeile erscheint ein 
Cursor. Jetzt müssen Sie einen 
mindestens aus zwei Zeichen 
bestehenden Programmnamen 
eingeben. Nach Drücken der 
RETURN-Taste wird der Brief 
dann als Programm auf der 
Disk abgespeichert. Den Brief 
können Sie mit DLOAD laden 
und mit RUN starten. Wenn Sie 
während des Schreibens schon 


mal sehen wollen, wie Ihr Werk 
später aussehen wird, dann 
drücken Sie einmal auf STOP 
und dann auf RETURN. Wenn 
Sie jetzt die Taste F6 betätigen 
oder RUN eingeben, so wird 
der Brief geschrieben. Wollen 
Sie weiterschreiben, so genügt 
es, nochmals auf STOP zu 
drücken. Doch Vorsicht! Hat 
der Computer zu diesem Zeit- 
punkt den Brief schon fertig 
geschrieben, dann wird ein 
RESET ausgelöst, wodurch der 
Brief natürlich verloren geht! 


Zur Eingabe: Den ersten Teil 
eintippen und unter dem Na- 
men FUNNY LOAD abspei- 
chern. Nun den zweiten Teil 
eingeben und beim Abspei- 
chern den Namen FUNNY 
LETTER verwenden. Achtung! 
Keine Probestarts vornehmen! 
Das Programm wäre unwie- 
derbringlich verloren! Wollen 
Sie das Programm laden, so 
genügt es, Teil 1 zu laden und 
mit RUN zu starten. Wir wün- 
schen viel Spaß mit FUNNY 
LETTER. 


Oliver Dangel 


Teil 1 


C-16 LISTING + CHECKSUMMEN (0C V1.0) 


108 PRINT"{ CLEAR DOWN3)POKE43,1:POKE44,20:PO 





KES120,0:NEW 


<178> 


118 PRINT" ( DOWN2}DLOAD"CHR$ (34) "FUNNY{ SPACE} 


LETTER*"CHR$ (34) 


128 PRINT“ { DOWN4} RUN { HOME} " 


<237> 
<95> 


138 POKE1319,13:POKE1320,13:POKE1321,13:POKE 


239,3 
ENDE DES LISTINGS 


<226> 


Teil 2 


C-16 LISTING + CHECKSUMMEN (OC V1.0) 


188 SCNCLR:COLORB, 1: COLOR4 
$(142) 
118. KEY4, "SYS4276"+CHR$ (13) 


22 


.1:PRINTCHR$ (8) CHR 


<165> 
<120> 





12® CHAR,13,10,"{L.BLUYPLEASE{ SPACEIWAIT..." <138> 
130 FORL=4897T04496 :READT: POKEL,T:NEXT <64> 
148 SCNCLR:COLOR1,3,7 <91> 
150 PRINTTAB(10)"{SU S*2 SI} < 206) 
1698 PRINTTAB(10)"{S- SU S* SK) <204> 
178 PRINTTAB(18)"{S5- 5J SI SU SI SU SI CA $* 

2 SI CA S*2 SI SU SI SU SI} <83> 
180 PRINTTAB(10)"{5- SU SK S- SJ SK S-2 SU S 

I 5-2 SU SI S-2 SJ SK S) <31> 
198 PRINTTAB(10)"{5J SK SPACE SJ 5*2 Sk SI S 

KSJ SK SJ SK SJ SK SJ SI SU SKY <249> 
208 PRINTTAB(10)"(SPACE16 SJ SK} <193) 
218 PRINTTAB(10)"{SU SI SPACE6 SU SI SU ST}  <170) 
228 PRINTTAB(10)"{5-2 SPACE6 5-4) <52> 
230 PRINTTAB(10)"{S-2 SPACE2 SU S* SI SU SK 

SI SK 5J SI SU $* SI SU S* SI <147> 
248 PRINTTAB(10)"{S- 5J S* SI S-.5* SK SJ SI 

SU SI SU SK S- 5* SK 5- SUSM <33> 
2580 PRINTTAB(10)"(5J $*2 SK SJ S* SK SPACE S 

J SK SJ SK SPACE 3J $* er SI sKı <116> 
268 PRINTTAB(8)"(DOWN3 RVSON L. BLU}WRITTEN{S 
PACE}BY {SPACE EromoLn VER{ SPACE) DANGEL <182>. 





27® PRINTTAB(6)"{DOWN RUSON L. BLUYCOPYRIGHT{ 
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PROGRAMME BEE 


SPACEI1987{ SPACE}BY{ SPACE YELLOW} ANGEL-SOFT <ı11> | 530 DATA 211,32,104,16,133,209,169,108 <191> 
28@ PRINTTAB(5)"(DOWN3 L.BLU}PRESS{SPACE YEL 540 DATA 145,232,96,32,119,16,169,147 <182> 
LOW}RETURN {SPACE L. BLU}TO{ SPACE}YWRITE{ SPACE} 5580 DATA 32,139,16,162,18,160,0.134 <214> 
A{ SPACE} LETTER j <155> | 5608 DATA 213,132,212,32,225,255,.240,23 <132> 
RR ee u: 
WHITE)YSYS42761 SPAC OR{S WH. F4 . P : > « P B 

{L.BLU}) ‘ <87> 598 DATA 134,213,224,64,208,229,96,169 <111> 
308 GETKEYK$:IFASC(K$)< >13THEN30®- <220> | 580 DATA 0,145,212,32,136,216,162,8 <208> 
310 PRINTCHR$ (9) :POKE44,16:CLR: 5YS4276 <216> | 610 DATA 32,207,255,157,50,3,232,134 <190> 
328 DATA 61,16,195,7,158,52,51.56 <5> 628 DATA 208,201,13,208,243,224,2,208 <43> 
330 DATA 55,58,143,34,20,20,20,2® <174> | 630 DATA 3,76,3,135,169,2,162,8 <97> 
348 DATA 20.20,20,20,20,20,.20,.29 <68> 1648 DATA 160,2,32,186,255,198, 208,165 . <76> 
350 DATA 20,20.20,20,20.32,32,32 <B> 650 DATA 208,162,50,160,3,32,189,255 <207> 
368 DATA 32,32,32,32,32,32,32,192 <240> | 660 DATA 169,1,162,16,133, 214,134, 215 <109> 
378 DATA 192,62,32,70,85,78,78,89 <202> 1670 DATA 169,214,166,212,232,164, 213,76 <21> 
380 DATA 32,76,69,84,84,69,82,32 <243> 1680 DATA 216,255,32.119,16,169,18,141 <126> 
390 DATA 60,192,192,0,0,0.0,134 <171> |698 DATA 17,255,169,147,32,139,16,160 <128> 
408 DATA 232,32,129,154,32,145,162,160 <ı121> | 700 DATA 0,162,18,132,212,134,213,173 <146> 
A1® DATA 40,32,129,154,32,123.160,32 <138> | 710 DATA 0,255,141,14,255,173,0,255 <8> 
420 DATA 145,162,164,232,32,129,154,32 <165> | 720 DATA 13,18,255,141,18,255,173,67 <161> 
430 DATA 158,158,32,228,157,24,105,12 <176> | 730 DATA 5,240,4,162,40,208,2,162 <86> 
440 DATA 132,232,133,233,160,9,96.32 <235> | 748 DATA 20,32,225,255,208,13,32,225 <61> 
458 DATA 110,16,177,232,96.138,72,152 <232> 1 750 DATA 255,249,251,169,0,141,17,255 <73> 
460 DATA 170,104,168,76,64,16,169,0 <181> | 768 DATA 76,201,16,.136.208,235,202,208 <223> 
478 DATA 141,21,255,141,25,255,169,113 <60> |77® DATA 232,160,0,177,212,240,11,32 <97> 
480 DATA 141,59,5,96,32,228,255,208 <22> 1788 DATA 139,16,230,212,208,193,230,213 <130> 
498 DATA 1,96,133,208,32,73.216,32 <223> | 798 DATA 208,189,169,0,133,239,141,17 <197> 
508 DATA 110,16,165,209,145,232,166,21® <215> | 8088 DATA 255,32, 228,255,240,251,76,249 <116> 
518 DATA 164,211,32,59,216,165,208,32 <135> | 818 DATA 255,76,50,3,0,0,0,0- <76> 
520 DATA 210,255,32,73,216,134,210,132 <44> ENDE DES LISTINGS 





Samplen mit einem BIT! 


für C16/116+32K/plus 4 





Dieses kurze Programm er- 
möglicht es Ihnen, Sprache 
oder Musik über den Kasset- 
tenport des C16 zu samplen. 
Die Qualität der Ausgabe ist 


nicht hoch, reicht aber für Ex- 
perimente vollkommen aus. 


Die Routine wird vom TED- 
MON aus mit L’SAMPLER” 


RS dlale >1A40 1A 60 A5 C6 

Das Listin »1A48 60 AC BE 1A 
>1A50 A9 01 85 64 

MC-LISTING MIT CHECKSUMMEN OVM10 >1A58 A9 00 85 14 
»1A60 A5 91 29 10 

>19F8 AD 06 FF.29 EF 8D 86 FF ::86 >1A68 Bi 14 05 64 
>»1AQQ A2 00 AD 00 A9 00 85 14 ::2C >1A70 OA 85 64 E6 
»1A08 A9 20 85 15 A9 00 91 14 ::D2 >1A78 08 DO ES A9 
>1A10O C8 DO F9 EB E6 15 E® 20 ::39 >1A80 01 85 64 CB 
>1A18 DO F2 A5 01 29 10 C9 10 ::05 >1A88 15 EO 60 DO 
>1A20 DO OB A9 FF 8D 11 FF 28 ::37 >1A9® AO 20 A9 08 
>1A28 38 1A 4C 1A 1A A9 09 ED ::DA >1A98 85 15 A9 00 
>1A3@ 11 FF 20 38 1A AC 1A 1A ::69 >1AAO 85 64 B1 14 
>»1A38 A5 C6 C9 OD DO 04 28 E7. ::52 >1AA8B FO 08 A9 08 
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 Sonder-Service: 
bis 19.00 Uhr in unserem Verlag 
Ihre Bestellungen aufgeben. 


‚8(,1) geladen und mit G 19F8 
gestartet. Drückt man die Ta- 
ste ”S”, so wird gesamplet. Die 
Aufnahme kann man anhören, 
wenn man die Taste ”G” betä- 


c9 iA FO 91 ::5C >1ABO 
A2 08 AB 0808 ::F6 >1AB8 
A9 00 85 63 ::3C >1ACO 
A9 28 85 15 ::52 >1AC8 
c9 10 DO 96 ::09 >1AD® 
91 14 A5 64 ::EA >1ADB 
63 A5 63 C9 ::2C >1AEO 
08 85 63 A9 .::A8 >1AEB 
DO DA EB E6.::A5 >1AFO 
D3 60 A2 00 ::A4 >1AF8 
85 14 A9 20 ::F5 >1B00 
85 63 A9 @1 ::EE >1B08 
25 64 C5 64 ::FE 

8D 11 FF 4C ::3D ENDE 


tigt. Zum Eingeben verwenden 
Sie bitte den MC-Checker, den 
Sie an Adresse 12680 legen 
sollten. Abgespeichert wird mit: 
S”’SAMPLER”,8(,1),19F8,1B10 


B7 1A A9 FF 8D 11 FF AS ::F4 
64 OA 85 64 E6 63 A5 63 ::D4 
c9 07 DO DE C8 DO D3 EB ::66 
E6 15 E®O 68 DB CC A4C 48 ::3E 
1A EA EA EA EA EA EA EA ::02 
EA EA EA EA EA EA EA EA ::DA 
EA EA EA EA EA EA EA A2 ::A2 
00 .AQD 00 A9 088 85 14 A9 ::D& 
20 85 15 A9 00 91 14 CB ::49 
D® F9 EB E6 15 E® 608 DO ::ED 
F2 28 AC 1A 60 Fi Fi Fi ::3E 
36 39 2C 31 38 2C 31 34 ::2A 


DES LISTINGS (OVM) 





Jetzt können Sie 
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BEE PROGRAMME 








Haben Sie Fragen 
zu unseren Listings? 


Unsere Programmierer helfen Ihnen: gerne weiter! Die HOTLINE ist unser Leserservice. 
Aber bitte wählen Sie nur die angegebene Nummer, und rufen Sie nur in der angegebenen Zeit an. 
Sie erleichtern damit den anderen Abteilungen des Verlages die Arbeit. Vielen Dank! 


HOTLINE O 56 51 - 3 00 13 


montags und freitags von 14 - 16 Uhr 







Laufschriftgenerator 





Mit dem Programm "LAUF- 
SCHRIFTGENERATOR” kann 
man Laufschriften mit Soft- 
scrolling erzeugen, bei der die 
Zeichen der Laufschrift 32 mal 
32 Punkte groß sind. Eine wirk- 
lich professionelle Laufschrift 
- also. 


Das Programm, ein Basic- 
Loader, erzeugt nach dem 
Start zunächst eine MC- 
Routine, die den Speicherplatz 
von $3C00 bis $3E23 belegt. 
Mit dieser Routine wird mittels 
des Rasterzeileninterrupts die 
Laufschrift erzeugt. Danach 
wird der Text eingegeben. Da- 
bei sind alle Zeichen außer 
dem Klammeraffen möglich. 


Der Klammeraffe muß RE- 
VERS eingegeben werden. Mit 
RETURN wird die Eingabe 
beendet, mit DEL das letzte 
Zeichen gelöscht. 

Nun wird der Text vom 
Programm ab. der Adresse 
$3E24 abgelegt, so daß kür- 
zere Texte auch auf einem 
C16/116 ohne Erweiterung 
möglich sind. 
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für C16/116/Plus 4) 


Als nächstes wird gefragt, ob 
die Laufschrift mit einem 
selbsterstellten oder dem 
Commodore-Zeichensatz dar- 
gestellt werden soll. Bei einem 
selbsterstellten Zeichensatz 
muß die Adresse angegeben 
werden, an der der Zeichen- 
satz beginnt. Diese darf aber 
nicht über $8000 liegen, da die 
Zeichendaten sonst aus dem 
ROM gelesen werden. 


Im Anschluß folgt die Eingabe, 
ob der übrige Bildschirm mit 
dem Original- .oder einem 
neuen Zeichensatz dargestellt 
werden soll. Bei dieser Eingabe 
geht man genauso vor wie bei 
dem zuvor beschriebenen Ar- 
beitsschritt. Der Computer gibt 
daraufhin die Befehle zum 
Ein- und Ausschalten der Lauf- 
schrift sowie die Start- und En- 
dadresse des Programms aus: 
Jetzt kann man die Laufschrift 
abspeichern, was vom Monitor 
aus mit dem Befehl: 
S”NAME” ,8(,1) , 3C00 , Pro 
grammende erfolgt. 
Geladen wird später mit: 
LOAD”NAME” ‚8(,1),1 


Der Start erfolgt mit: 
SYS15360 

Die Eingabe gestaltet sich 
recht einfach, da es sich beim 
LAUFSCHRIFTGENERATOR 


um ein Basic-Programm han- 
delt, welches unter einem be- 
liebigen Namen abgespeichert 
werden kann. 

Frank Barwich 


C-16 LISTING + CHECKSUMMEN (0C V1.0) 


DATA00,85,DB,06,DA,26,DB,06 


10 POKE55,255:POKES56,59:CLR <141) 
28 COLOR@,1:COLOR4,1:COLOR1,2 <al> 

3@ DATAA9,43,A2,3C,78,8D,14,03 <1933 
4® DATABE,15,03,A9,00,8D,41,3C <101> 
50 DATA8D,49,3D,A9,07,8D,42,3C <194) 
60 DATAA9,20,A2,0F,85,D8,86,D9 <173>3 
70 DATAA9,24,A2,3E,85,DC,86,DD <178> 
80 DATA58,60,A9,0E,A2,CE,78,8D <33> 

98 DATA14,03,8E,15,03,AD,07, FF <56> 

100. DATA29,F8,09,08,8D,07,FF,58 <204> 
110 DATA68,00,00,AD,09,FF,8D,09 <241) 
120 DATAFF,29,02,D0,03,4C,C3,FC <127> 
138 DATAAD,OB,FF,C9,C1,F®,25,AD <173> 
140 DATA07,FF,29,F0,0D,42,3C,AA <139> 
150 DATAA®,DO,A9,A3,CD,1D,FF,D® <2527 
160 DATAFB,8E,07,FF,A9,C4,8D,12 <147) 
17® DATAFF,8C,13,FF,A9,78,8D,®B <1022 
180 DATAFF,4C,C3,FC,AD,07,FF,29 <124> 
198 DATAF8,09,08,A0,C4,A2,7B,EC <158) 
288 DATA1D,FF,DO,FB,8D,07,FF,8C <169> 
218 DATA12,FF,A2,D®,8E,13,FF,CE <142) 
220 DATA42,3C,10,10,20,4D,3D,A9 <172> 
230 DATAO7,8D,42,3C,A9,9D,8D,0B <997 

240 DATAFF,4C,C3,FC,20,11,DB,208 <11> 

250 DATABF,CF,20,CD,CE,A9,9D,8D <51> 

268 DATAOB,FF,4C,C3,FC,85,DA,A9 <155) 
278 <69> 
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280 
298 
308 
310 
320 
330 
340 
350 
369 
370 
380 
390 
‚ 480 
410 
' 420 
430 
440 
450 
460 
470 
480 
490 
500. 
510 
520 
530 
549 
550 
560 
579 
580 
590 
600 
610 
620 
630 
640 
650 
669 
670 
689 
690 
-708 


DATADA, 26,DB,06,DA,26,DB,A5 
DATADB, 69,D8,85,DB,68,AE,4B 
DATA3D,AC,4C,3D,98,E0,00,F® 
DATA29,E0,01,F0,34,E0,02,F® 
DATA48,C0,00,D8,03,A9,E2,60 
DATACO,01,D9,03,A9,FB,60,C® 
DATA®2,D0,03,A9,EC,60,A9,A®d 
DATA60,C0,00,D8,03,A9,20,6® 
DATAC®,01,D8,03,A9,6C,60,C® 
DATA02,D8,03,A9,7B,60,A9,62 
DATA60,C®,00,D0,03,A9,7C,6® 
DATAC®,01,D0,03,A9,E1,60,C0 
DATA02,D®,03,A9,FF,60,A9,FE 
DATA60,C0,00,D0,03,A9,7E,60 
DATAC®,01,D0,03,A9,7F,60,C0 
DATA02,D0,03,A9,61,60,A9,FC 
DATA60,00,3C,02,00,A0,01,Bi 
DATAD8,88,91,D8,C8,C8,C0,A® 
DATAD®,F5,AD,49,3D,29,03,D® 
DATA1A,A0,00,B1,DC,DO,0B,A9 
DATA24,A2,3E,85,DC,86,DD,4C 
DATA63,3D,8D,4A,3D,E6,DC,D® 
DATA®2,E6,DD,CE,49,3D,AD,4A 
DATA3D,20,BD,3C,A0,00,B1,DA 
DATA20,0D,3E,8D,4B,3D,A®,01 
DATAB1,DA,20,0D,3E,8D,4C,3D 
DATA20,D6,3C,8D,09,3E,A8,02 
DATAB1,DA,20,0D,3E,8D,4B,3D 
DATAA®,03,B1,DA,20,0D,3E,8D 
DATA4C, 3D, 20,D6,3C,8D,®A,3E 
DATAA®,04,B1,DA,20,0D,3E,8D 
DATA4B,3D,A®,05,B1,DA,20,0D 
DATA3E,8D,4C,3D,20,D6,3C,8D 
DATA®B, 3E,A®,06,B1,DA,20,0D 
DATA3E,8D,4B,3D,A0,07,B1,DA 
DATA2®,0D,3E,8D,4C,3D,20,D6 
‚DATA3C,8D,0C,3E,AD,09,3E,A® 
DATA27,91,D8,AD,0A,3E,A0,4F 
DATA91,D8,AD,0B,3E,A0,77,91 
DATAD8,AD,0C,3E,AQ,9F,91,D8 
DATA60,7E,20,20,7E,A8,AD,49 
DATA3D, 29,03,8D,49,3D,98,AE 
DATA49,3D,F0,05,4A,4A,CA,DO® 
710 DATAFB,29,03,60,3C,01,02,03 
220 PRINT" (CLEAR DOWN SPACES} LAUFSCHRIFTGENE 
ATOR" 
738 PRINT" { SPACE9I} sansamunnnnnunnunnumm! 
748 FORT=15360T015908 : READP$ :POKET,DEC(P$) :N 
EXT 
758 PRINT" {DOWN SPACE}YWIE(SPACE)LAUTET{SPAC. 
E}DERt SPACE}YTEXT{ SPACE} 2?" :PRINT'" (DOWN RVSON 
SPACE RVSOFF)Y“; 
768 X=0:Y=-9:AD=15908: 2-0 
779 DO 


- 780 GETKEY A$: IFA$=CHR$ (13) THENEXIT 

781 IFAS="@"THENIFPEEK (194) -OTHEN780 

790. IF INSTR("(BLACK WHITE RED CYAN PURPLE G 
REEN BLUE YELLOW ORNG BRN YL.GRN PINK BL.GRN 
L.BLU D.BLUE L. 2 EN FLASHON FLASHOFF LEFT RI 


$::GOT0888 

810: IFA$=CHR$ (20) THENGOSUB920 :GOT0880 

820: CHAR,X,Y,A$ 

821 P=40*PEEK (205) +PEEK (202) +3072: POKEP, 160: 
POKEP+1,32 

838: POKE203,® 

840: ‚CHAR, 0,0, "{ BLACK} "+A$:POKE203, 0: PRINT" (W 
‘‚HITE}"; 

‚850: °X=X+1: IFX>39THENX=0:Y=Y+1: PRINT" {DOWN UP 
Yo IFY>24THENY=24 

869: :POKEAD+Z,, PEEK (3072) 

878 Z=Z+1 

880:'LOOP 

890: IFZ=-OTHENPRINT" (HOME DOWN2}": G0T0750 
900: POKEAD+Z,8:L=AD+1+2 

912: GOTO978 
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<1> 

<213> 
<142> 
<181> 
<11> 
<190> 
<1057 
<111> 
<2227 
<231> 
<1287> 
<1837 
<75> 
<2008> 
<97> 
<30> 
<179> 
<103> 
<161> 
<188> 
<99> 
<1723 
<22> 
<1387 
<23> 
<1337 
<1487 
<1327 
<223> 
<56> 
<249> 
<153> 
<129> 
<183> 
<154> 
<172> 
<136> 
<2547 
<6> 

<4> 

<30> 
< 245? 
<213>2 
<185> 


<19> 
<79> 


<237 


<181> 
<156> 
<240> 
<186> 
<179) 


<201> 


<2057 
<4a1> 
<211> 


<200> 
<148> 


<14> 
<246> 
<185.> 
<210> 
<95> 


 <£116> 


<127> 
<241> 


928 IFY-9THENIFX-OTHENRETURN 

921 X=X-1: IFXCOTHENY=Y-1:X=39 

930 CHAR,X,Y, "(SPACE)" +A$ 

931 P=40*PEEK (285) +PEEK (202) +3072:POKEP,16®: 

POKEP+1,32 

948 IF Y=8THENY=9:X=0: RETURN 

941 POKEP+41,32 

958 Z=2Z-1 

968. RETURN 

978 PRINT"{CLEAR DOWN RVSOFF SPACE9)LAUFSCHR 
IFTGENERATOR" 

988 PRINT" { SPACE9} m mn a in am zu ums m un a un un un m an au a un u un 

998 INPUT" {DOWN2 RIGHT} AB{ SPACE}WELCHER ( SPAC 
E}ZEILE({ SPACE} SOLL{ SPACE} DIE{ SPACE} LAUFSCHRI 

FT{ SPACE3} ERSCHEINEN ( SPACE} (0-21) ";A$ 

1000 A=VAL(A$) : IFACOORA>21THEN99® 

1010 Z=40*A+3072:A$=HEX$ (Z) 

1028 L$-RIGHT$.(A$,2) :H$=LEFT$(A$, 2) 

1030 POKE15385,DEC (L$) :POKE15387,DEC (H$) 
1040 RZ=A*8+3: POKE15459,RZ 

10850 IFA=21THENRU=204 : POKE15494,RU:GOTO107® 
1060 RU=RZ+32:POKE15494,, RU 

1070 POKE15525 ,RZ-3: POKE15542, RZ-3: POKE15477 
‚RU-3: POKE15444, RU-3 

1080 PRINT"{DOWN2 SPACE}SOLL{SPACE}DIE( SPACE 
}LAUFSCHRIFT(SPACE}DEN(SPACE RVSON}C{ RVSOFF} 
OMMODORE- { SPACE5S} ZEICHENSATZ ( SPACE}ODER{ SPAC 

EYEINEN{ SPACE)"; 

1098 PRINT" {RVSON}S{ RVSOFF}YELBSTERSTELLTEN" 
1108 PRINT"{SPACE}ZEICHENSATZ{ SPACE}DARSTELL 

EN{ SPACE} ?" 

1118 GETKEYA$ : IFAg< >"C"ANDA$< >"S"THEN1110 
1120 IF Ag="C"THEN1210 

1138 PRINT"{DOWN RIGHT DOWN}ABi SPACE)}WELCHER 
{SPACE} ADRESSE ( SPACE} LIEGT { SPACE} DER { SPACE}S 

ELBST-{ SPACE4} ERSTELLTE({ SPACE} ZEICHENSATZ"; 
1148 INPUT" {SPACE} (HEX.) SPACE)" ;A$ 

1150 IF LEN(A$)< >4THEN1130 

1160 FORT-1T04 

1170 Z$=MID$ (A$,T,1) 

1180 IF INSTR("1234567890" ‚2$)=@THEN1130 
1199 NEXT 

1200 ZS$=LEFT$(A$,2) :POKE15570,DEC (25$) 

1210 PRINT"({DOWN2 RIGHT}SOLL{SPACE}DER{ SPACE 
}RESTLICHE{ SPACE} BILDSCHIRM{ SPACE} IM" 

1220 PRINT"{SPACE RVSON)C{ RUSOFF}OMMODORE-ZE 
ICHENSATZ { SPACE} ODER SPACE} IN{ SPACE} EINEM" 
1230 PRINT"(SPACE RVSON}S{RVSOFF}ELBSTERSTEL 
LTEN{ SPACE} ZEICHENSATZ { SPACE} DAR-" 

1240 PRINT" (SPACEIGESTELLT { SPACE}WERDEN{ SPAC 

E} y" 

1250 GETKEYAS$: IFA$< >"C"ANDAS< >"S"THEN125® 
1260 IFA$="C"THENPOKE15492,196:POKE15507., 208 
:GOT01358 

1278 PRINT" {DOWN2 SPACE}AB{SPACE}WELCHER (SPA 
CE) ADRESSE SPACE} LIEGT ( SPACE} DER { SPACE} SELBS 

T-{SPACE4)ERSTELLTE( SPACE} ZEICHENSATZ"; 

1280 INPUT"{SPACE} (HEX.)";A$ 

1290 IFLEN(A$)< >4THEN1270 

1308 FORT-1T04 

1319 Z$=MID$ (A$,T,1) 

13208 IF INSTR("1234567890" ,2$)-®THEN1278 
1330 NEXT 

3300 DNS ERERINE EI PREIS OBERE 
C(25$ 

1350 PRINT"(CLEAR DOWN2 RIGHTZYEIN: (SPACEISY 
515360":PRINT 


















































338% PRINT: { RIGHT?} AUS: ( SPACE}SYS15402":PRIN. 


1378 PRINT" { RIGHT7}PROGRAMMANFANG: (SPACEI153 
60/$3C08": PRINT 

1380 PRINT" { RIGHTZ}PROGRAMMENDE: { SPACE2Y"L" 
LEFT}/$"HEX$(L) 





ENDE DES LISTINGS 


PROGRAMME EEE 





<159> 
<84> 
<153> 


<54> 
<2477 
<167> 
<38> 
<81> 


<12> 
<74> 


<140> 
<132> 
<189> 
<219> 
<1> 
<12> 
<117> 
<182> 


<149> 


<178> 
<210> 


<5> 
<216> 
15? 


<21> 
792 
<30> 
<251> 
<211> 
<203> 
<44> 
<223> 


<229> 
<124> 
<183> 


<26> 
<224> 


<1787 
<188> 
<218> 


<235? 
<136> 


<96>. 
<212> 
<185> 
<178> 
2145) 
<199> 
<ı71>3 
«623 


25. 


Re TEE or 


BEE PROGRAMME 


Bildschirmeffekte mit Special FX 


(für C16/116/Plus 4) 





sind sechs Bildschirm-Effekte 
enthalten, die in eigenen Pro- 
grammen verwendet werden 
können. Das Programm liegt 
im Speicherbereich von $3C00 





Adresse 4097 ein, und spei- 
chern Sie es mit dem Befehl 
S”EFFECTS”,8(,1),3C00,3F0- 
8 ab. 


Wollen Sie die Routinen nun in 








Routinen mit LOAD”EF- 
FECTS” ,8(,1),1. Nun wird fol- 
gendes eingegeben: _NEW 
(RETURN)POKE55,0:POKES56, 
59 (RETURN). 





werden. Zur Funktion der ein- 
zelnen Effekte schauen Sie 
sich bitte das Demo an. Es 
zeigt recht eindrucksvoll, was 
für Effekte möglich sind. 





bis $3F00. Tippen Sie das Li- eigenen Programmen verwen- Jetzt kann das eigene Pro- Hartmut Ott 
sting mit dem MC-Checker an den, so laden Sie zunächst die gramm eingetippt oder geladen 
Warzen >3CEQ AB 00 AD 08 FF 8D 15 FF ::97 |?3DF8 CF E6 E5 A5 E5 C9 15 DO ::55 
BER Listing >3CE8ß 8D-19 FF A2 00 ES EQ 10 ::78 |?3E800 C3 A2 00 AD 19 FF 29 7F ::87 
»3CF@ DO FB CB DO ED C6 EO D® ::6F |?3E08 9D 00 28 9D 08 89 SD 00 ::F@ 
>3CF8 E7 60 EA EA EA EA EA EA ::05 |?35E10 OA 9D 00 OB A9 AD SD 00 ::16 
>3D00 A2 00 A9 AO 9D 00 GC 9D ::A7 |?3E18 BC 9D 00 OD 9D 00 GE 9D ::2B 
>3D08 20 OD 9D 00 BE 9D 08 OF ::A2 |?3E20 00 OF CA DO DE 68 EA EA ::66 
MC-LISTING MIT CHECKSUMMEN OVM10 |»3D1@ CA D® EF A2 00 AD 02 FF ::20 |?3E28 20 79 04 F@ 09 C9 2C FO ::DB 
>3D18 29 03 18 69 08 85 D9 AD ::oD |?32E30 DB A2 OB AC 83 86 20 73 ::39 
>3C00 A9 08 85 D8 A9 OC 85 D9 ::D4 |y3D20 04 FF 85 D8 AO 00 AD 98 ::29 |>3E38 04 AC 2B 3E 20 73 04 FO ::79 
'>3C08 A2 08 A5 D9 38 E9 04 85 ::0B |y3D28 FF 29 7F 91 D8 CA DO ES ::43 |?3E40 FB C9 31 98 04 C9 39 98 ::B7 
>3C10 D9 AO 00 AD 19 FF 29 7F ::A7 |33D30 AO 00 A2 00 E8 D® FD CB ::86 |?3E48 04 A2 BE DO E6 85 DA 29 ::CA 
>3C18 91 D8 C8 CO 28 D® F9 AS ::8C |y3D38 Co 10 DO F6 C6 EO De D3 ::03 |?3E50 73 04 FO 86 C9 3A FO 02 ::DA 
>3C20 D9 18 69 04 85 D9 AB 00 ::BF |y3D40 60 EA ER EA EA EA EA EA ::DB |?3E58 DO EF A5 DA 38 E9 31 85 ::A8 
>3C28 BD 5B 3C 91 D8 C8 CO 28 ::37 |y3D48 A9 39 A2 00 9D 08 OC 9D ..D3 |?3E60 DA AS DF OA BA OA 18 65 ::C5 
>3C30 DO F9 E8 EO 08 DO 14 A2 ::®A |y3p50 90 OD 9D 00 ®E 9D 88 OF ::EA |?3E68 DA AA BD 78 3E 85 E® 60 ::3F 
>3C38 00 A5 D8 18 69 28 85 D8 ::06 |y3p58 CA DO Fi 85 E7 A5 EO A2 ::77 |?3E70 01 083 85 08 8C 10 18 28 ::68 
»3CA0 90 82 E6 D9 AS D8 C9 E& ::2E |y3D60 00 AD 28 88 D® FD CA D® ::01 |?3E78 20 40 60 80 AB CO EO 00 ::36 
>3C48 DO 01 60 A9 00 AQ 008 C8 ::1A |yan68 FB 38 E9 01 DO Fi A5 E7 ::3D |?3E80 40 58 790 88 AB B8 DO ES :: 75 
>3C50 DO FD 18 69 01 C5 EO DO ::85 >3E88 01 02 03 04 05 06 07 08 ::92 
»3C58 FA FO AF 63 77 78 E2 F9 ;:ım |?2D70 38 E9 01 C9 30 DO DI 60.::73 |,3E9g A9 90 20 EO 3E 20 20 3C ::2D 
32C6Q EF E4 AO ER ER EA ER ER ::9F |?9D78 A9 BO BD 11 FF AO 00 EA. ::BA |S3Eog 60 EA AO 00 20 EO 3E 20 ::97 
3SC6B A2 00 AD 19 FE 29 7F OD ::03 |>2D8@ ER AD 00 FF 29 01 FO @D ::CB |,3png 68 ac 00 ER ao 01 20. 20 22 
Sale SD EOBTDE-CN DO ERA9 AR seEFelS9DSQ 14. BE ACER SDLAD 11 FESTER |Sopno- AS 0 20 ma-3E 30 Da ae 
zceu 2D Ua de DD 00 OD SD 00 :;84 173098 C9 B7. TU E5 BE II FF AD : EN |sseng a EA Ag:03 20-ma- SE 
33C88: ‚OE).9D 00-0F.CA DO-F1 ,A9-:4F9|>3DAQ 00.85 E6-E6 E6 AS E6 CO, :: IF |sapco an aD 6a ER Au or zu co un 
»2090 CO 85 DB A9 OF 85 D9 A2 ::2A |>3DAB OA DO F& 88 DO D3 C6 EO ::09 |yspca 3E 20 78 3D 60 ER ER EA FD 
>3C98 07 AU 08 BD D® 3C 91 DB ::3E |>3DB@ D® CB 60 EA EA EA EA EA ::DF >3ED® A9 01 20 EO 3E 20 Co 3D ::B7 
>3CAQ C& CO 28 DO F9 CA EO FF ::8D |>3DBB EA EA ER ER EA EA EA EA ::DD (ySpng 60 ER EA EA EA EA ER ER 74 
>3CA8 DO 14 A207 AS D8 38 E9 ::F7 |>2DCO A9 00 85 ES A9 0Q 85 E6 ::EO |sarEQ 85 DF 20 28 3E 60 EA ER un 
>3CBaO 28 85 D8 BO 02 C6 D9 A5 ::2B |>3DC8 AD 04 FF 29 03 18 69 08 ::19 >3EE8 ER ER EA EA EA EA ER ER ::0E 
>3CB8 D8 C9 D8 DO 01 60 A9 00 ::@A |>3DD® 85 D9 AD 00 FF 85 D8 AO ::AC >3EF® ER EA EA EA EA EA ER EA ::16 
>3CC0 Ad 080 C8 DO FD 18 69 81 ::9C |>3DD8 08 AD 19 FF 29 7F 91 D8 ::34 >3EF8 EA EA EA EA EA ER EA ER ::1E 
23CC8 C5 EQ DO FA FO, CB EA EA ::Fi |>3DEQ A5 D9 18 69 04 85 D9 AY ::C9 >3F00 00 22 00 80 00 80 00 09° ::3F 
»3CD@ 20 63 77 78 E2 F9 EF E4 ::20 |>3DE8 AB 91 D8 A6 EO CA D® FD ::BB >3F08 F® F® 00 00 FO FO 00 00 ::67 
>3CD8 EA EA EA EA EA EA EA EA ::FC |>3DF® EA EA EA EA EA E6 E6 DO :: 11 ENDE DES LISTINGS (OVM) 
26 
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“ BEREIT SHTSTe) 


C-16 LISTING + CHECKSUMMEN (OC V1.0) 
























18 REM smunszenmenmsosszmnussmmusmennnuns <9> 
20 REM ===== DEMOPROGRAMM ZUM 
30 REM ===== ANWENDERPROGRAMM 
4® REM ===== SPECIAL EFFECTS 


z..u.,mum 72 


<154> 
<772 








50 REM ===== WRITTEN BY zuonnnum <28> 
60 REM ===== HARTMUT OTT zum. <218> 
70 REM ===== COPYRIGHTS BY „uuonnasn <81> 
80 REM ===== TRONIC-VERLAG „unnuunn <112> 
98 REM =-=uznzmnmunzonzunmnunnunznauuauns <89> 
108 COLORO,2,7:COLOR4,1,1 <31> 
110 PRINT"{CLEAR RED RIGHT12 DOWN3}M{ SPACE2} - 
DISERCEENLSPACEZIULSPACH, : a <122> 
20 PRINT"{DOWN2 RIGHT8 GREEN}1{ SPACE2)-{SPA 
CE3}WISCHER" <63> 
130 PRINT"(DOWN RIGHTS BLACK) 2{ SPACEZ)-(SPAC 
E3)FARBENVIELFALT" <55> 
140 PRINT"{DOWN RIGHTS CYAN}3{ SPACE2}-{ SPACE 
SYMOSAIK { SPACE} UND{ SPA SPACE}QUADRATE” <59> 
150 PRINT"(DOWN RIGHTS PURPLE}4{ SPACE2)-{ SPA =. 
.CE3} COUNTDOWN ( SPA SPACE}UND{ SPACE} QUADRA' <177> 





160 PRINT"{DOWN RIGHTS BLUE}S{ SPACE2)- {SPACE 
3} SOUND { SPACE} UND ( SPACE} FARBEN" 











ELIIIIITIIPETIITErT 





den. Mit dem Joystick in Port 1 
steuert man ein Fadenkreuz. 
Mit dem Feuerknopf wird eine 
Rakete abgeschossen.‘ Aber 
Achtung, sie müssen aufpas- 


Bei diesem Spiel handelt es 
sich um eine Art Tontauben- 
Schießen im Weltraum. 

Mit 40 Schüssen müssen 30 
Raumschiffe abgeknallt wer- 
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PROGRAMME EEE 





175 GETA$:IFA$<CHR$ (49)ORA$ rer eormenıS <28> 
180 A=VAL(A$) <132> 
198 ONAGOSUB250,300,400,500,608 <41> 
195 FORL=1T050® :NEXT <22> 


288 GOTO1208 <3> 
258 SYS16016,3:SYS16026,4: RETURN <98> 
388 PRINT"{CLEAR BLACK DOWN18 RIGHT7YHIER{SP 
ACE}KOENNEN{ SPACE)SIE{. SPACE}SEHEN ( SPACE}WIEV 

















IEL" <221> 
305 PRINT" { DOWN RIGHT7YFARBEN{ SP ACE}DER{SPAC 
E)C-16{ SPACE}HAT"" <188> 
318 SYS16036,8:RETURN <102> 
400 SYS16048,5:5Y516080,5:5Y$16026,3:RETURN  <111> 
508 PRINT"{ CLEAR GREEN DOWN18 RIGHT7YA{SPACE 

YC{ SPACEYH{ SPACEYT{ SPACE} U SPACE}N{ SPACE)G(S 

PACERT SEEN <14> 
505. PRINT" { DOWN een 
PACE}LAEUFT( SPACE}GLEICH" } ; <26> 
518 FORT=1T01008:NEXT <182>- 
5280 SCNCLR:SYS16058,3:5Y516080,3:RETURN <213> 
600 SYS16068,4:5Y516036,3: RETURN <236> 
10080 REM ==uansnmzmnzusuznnnuunmmznnonnmunmm <109> 
1018 REM ==== ENDE DES LISTINGS ==-.u= <80> 
1020 REM ==== THANKS TO REM wnunun <68> 
1030 REM ==== AND OTHERS . zanunu <243> 
1048 REM =====G00DBYE zu... <89> 
1050 REM ==u=mwnmznumunnnnnnnsannzuammnm <1608> 


ENDE DES LISTINGS 









„FADENKREUZ | 
Zu Ba 






hun 2773 





sen! legen und das Maschinen- 
Programm eingeben. Es wird 
abgespeichert mit S’FIGHT IN 
SPACE" ‚8(,1),3980,3FE8 


Hartmut Ott 


Die Rakete benötigt ca. 1,5 Se- 
kunden, um das Ziel zu errei- 
chen. Also nicht zu spät 
abdrücken. Nach dem Start 
des Spiels muß die Taste "Fi" 
betätigt werden, damit das 
Spiel beginnt. 





Name: Fight in Space 
Computertyp: C 16/116/ +4 
Lauffähig: Kass. od. Disk 
Besonderheiten: 

Tontaubenschießen im All. 
Kurzes, aber gutes Listing 


Tippen Sie den kurzen Basic- 
Loader ein. Dieser wird unter 
dem Namen "FIGHT LOADER 
” abgespeichert. Dann den 
MC-Checker an Adresse 4097 


C-16 LISTING + CHECKSUMMEN (OC V1.0) 


en (174) <154> 
F A=® THEN A=1: :LOAD"FIGHT{ SP, SPACE} IN{ SPACE 
ISPACE",X,1 : 
15 IF A=1 THEN A=2:5Y515088 

ENDE DES LISTINGS 










<58> 
<1943 
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EEEE PROGRAMME 
[Das Listinn | 


MC-LISTING 


>3989 
23988 
>3998 
23998 
>39AO 
>39A8 
.239B0® 
>39B8 
239C0 
"239C8 
>39D8 
>39D8 
>39E0 
>39E8 
>39F0d 
>39F8 
„>3A00 
>3A08 
>3A10® 
>3A18 
>3A20 
>3A28 
>3A30 
>3A38 
>3A40 
>3A48 
>3A50 
>3A58 
>3A60 
.>3A68 
>3A70 
>3A78 
'>3A80 
>3A88 
">3A90 
>3A98 
>3AAO 


>3AAB' 


>3ABO 
>3AB8 
>3ACQ 
>3AC8 
>3ADO 
>3ADB 
>3AE® 
>3AEB 
>3AF® 
>3AF8 
>3B00 
>3B08 
>3B10 
>3B18 
>3B20 
>3B28 
>3B39 
>3B38 
>3B40 
>3B48 
>3B50 
>3B58 
>3B60 
>3B68 
>3B7% 
>3B78 
>3B80 
>3B88 


28 






8D 52 83 
03 C9 FF 
49 83 CE 
EA EA EA 
20 20 3D 


CE 49 
D® 08 
48 03 
EA EA 
20 98 
EA EA 
A9 008 
EA EA 
D® 3C 
E6 20 
88 CB 
F6 28 
EA-EA 
EA EA 
EA EA 
EA EA 
CD 4E 
CD 4E 
3B A9 
EA EA 
11 FF 
BC 8D 
FF EA 
A® 3A 
LISPR 
03 8C 
EA EA 
80 DO 
A9 C7 
09 18 
52 03 
AD 11 
EA EA 
FF CE 
83 AC 
1A EE 
08 DO 
AD 11 
aC BE 
AD 11 
11 FF 
c9 18 
53 83 
FF 29 
8D 53 
aC DE 
A2 00 
00 0D 
A2 ES 
20 88 
A2 08 
FB E8 
EF AS 
EA EA 
03 CA 
03 A9 
8D 48 
A9 080 
EA EA 
3B 20 
AD 4A 
DO 07 
0E A2 
E8 EO® 
DO 39 
c8 D® 


AD 
09 


MIT CHECKSUMMEN OVM1® 


49 ::AD 
8D ::58 
EA ::A7 
EA ::B9 
EA ;:C6 
EA 3:C9 
83 ::A9 
EA ::92 
280 ::3E 
68 ::F4 
EB ::7E 
60 ::29 
-EA--::01 
EA ::09 
EA ::11 
EA ::19 
09 ::22 
01 ::93 
4C ::CC 
78 ::AF 
EA ::2B 
A9 ::67 
EA ::F2 
78 ::27 
A® ::37 
567303 
03 ::1A 
84, ::AC 
FF.i::8B 
FF _::9F. 
C9 ::Al 
EF ::8E 
52 ::4E 
AD ::42 
AD ::C5 
AD ::ı1 
00 ::AB 
28 ::20 
107%: FF 
DF ::48 
CE ::03 
EE ::51 
98 ::2B 
LEI: 3R 
DD ::C8 
EA ::93 
9D ::44 
®E ::88 
@F ::B7? 
AB ::E3 
18 ::02 
c8 ;:7C 
04 ::CD 
A9 ::A3 
A9 .::EA 
47 ::49 
03 ::41 
03 ::C4 
3A ::AA 
28 ::3B 
oc 3 
03 ::Al 
88 1 
F6 ::62 
A9 ::2A 
69 ei 


- 29B99 . 


>3B98 
>3BA® 
>3BA8 
>3BB® 
>3BB8 
>3BCO 
>3BC8 
>3BDO 
>3BD8 
>3BE® 
>3BE8 
>3BF@ 
>3BF8 
>3C00 
>3C08 
>3C1® 
>3C18 
>3C20 
>3C28 
>3C30 
>3C38 
>3C408 
>3C48 
>3C50 
>3C58 
>3C608 
>3C68 
>3C70 
>3C78 
>3C8® 
>3C88 
>3C98 
>3C98 
>3CAQO 
>3CA8 
>3CB0 
>3CB8 
>3CC® 
>3CC8 
>3CD® 
>3CD8 
>3CE® 
>3CE8 
>3CF® 
>3CF8 
>3D08 
>3D08 
>3D1® 
>3D18 
>3D28 
>3D28 
>3D30 
>3D38 


. >3D48 


>3D48 
>3D50 
>3D58 
>3D6® 
>3D68 
>3D70 
>3D78 
>3D80 
>3D88 
>3D908 


:23D98 


>3DA® 
>3DA8 
>3DB®d 
>3DB8 
>3DC® 


EF ::94 
EA ::1F 
EA ::6B 
EA ::CB 
11 ::0C 
89 ::9F 
01 ::4A 
EA ::E3 
ER 2393 
AD ::FD 
AS ::B® 
EA ::FE 
EA ::13 
EA ::ıB 
CA ::F7 
A9 ::D5 
BA ::C3 
C4 ::E7 
05 ::95 
8D ::7B 
68 ::CA 
EA ::5C 
D9 ::14 
69 ::85 
88.:2:523 
D8 ::D8 - 
68 ::19 
EA ::8G; 
68 ::1® 
68 ::78 
Bil ::A5 
48 ::4F. 
71 :3E7 
9% ; 527 
E@& ::BA 
EA. ::C7 
83 ::DE 
09 ::6C 
06 ::46 
EA ::67 
C9::95 
®A ::3B 
44 ::35 
8D ::9D 
BD ::®F 
BO ::68 
EF ::B® 
48 ::BF 
EA ::®2 
EA ::3D 
AI ::7A 
A2 ::BC 
BD ::DC 
Ei °2:35 
EA ::DB 
OF ::87 
28 ::ıF 
28 ::ı15 
28 ::9A 
20 ::85 
89 ::7F 
20 ::43 
09 ::DD 
28 ::C2 
20 ::AD 
38 ::BC 
69 ::FD 
A2 ::FA 
9D ::72 
38 ::ED 
EA ::4B 


>3DC8 
>3DD2 
>3DD8 
>3DE® 
>3DE8 
>3DF@ 
>3DF8 
>3E00 
>3E08 
>3E1® 
>3E18 
>3E20 
>3E28 
>3E3® 


>3E38 
>3E40 
>3E48 
>3E5® 
>3E58 
23E60 
>3E68 
>3E79 
>3E78 
>3E89 
>3E88 


>3E90 


>3E98 
>3EAO 
>3EA8 
>3EBO® 
>3EB8 
>3ECO 
>3ECB 
>3ED® 
>3ED8 
>3EE® 
>3EE8B 
>3EF® 
>3EF8 
>3F00 
>3F08 
>3F10 
>3F18 
>3F20 
>3F28 
>3F30 
>3F38 
>3F40 
>3F48 
>3F50 
>3F58 
>3F68 
>3F68 
>3F70 
>3F78 
>3F808 
>3F88 
>3F90 
>3F98 
>3FAQ 
>3FAB 
>3FBO® 
>3FB8 
>3FCO 
>3FC8 
>3FDO 
>3FD8 


>3FEO 


>3FE8 
ENDE 


C-16 Sonderheft 5/88 


A9 
EA 
Ag 
60 
u 


E-EF 


28 A9 73 : 
6B 91 DB :;25 
D8 A9 088 ::67 
03 D® BE ::94 
07 EA EA ::D7 
60 AD 52 ::A7 
BO 03 20 ::81 
EA EA EA ::06 
AE 03 AB ::908 
EA EA EA ::AE 
D8 CB 91 : 
39 28 DB ::ı13 
FF D® 08 ::EC 
CE AA 03 ::26 
81 FO 86 ::05 
SF CE AD ::21 
51 03, CD ::51 
88 8D 51 ::4D 
4D 03 C9 ::E® 
FO BF AD ::12 
BB 28 DO ::DA 
34 20 E2 :;22 
88 A9 AD ::C4 
91 D8 C8 ::47 
28 A9 AE ::66 
91 D8 C8 ::57 
EA EA EA ::67 
EA EA EA ::EF 
CE 4B 083 ::A3 
EA EA EA ::75 
SD 89 80 ::iF 
F 88 00 ::ı19 


DES LISTINGS (ovm 


Freuen Sie sich jetzt schon auf das nächste 


u 27.8.1988 bei Ihrem Zeitschriftenhändler 
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‚Gefährliche Zeiten, 
haarige Situationen 
in Scramble 


Kennen Sie Scramble? Nein? 
Dann sollten Sie es unbedingt 
kennenlernen! Nun aber mal 
ernsthaft. Bei Scramble han- 
delt es sich um ein Ballerspiel. 
Ort des Geschehens ist eine 
Höhle, in der die verschieden- 
sten Gefahren auf Sie lauern. 


In dieser Höhle gibt es u.a. 
Abfang-Raketen, die gegen Sie 
eine ganz besondere Abnei- 
gung hegen. Natürlich können 
und müssen Sie sich wehren. 
Wenn Sie die Taste ”T” 
drücken, werden Ihre Gegner 
bombardiert. Die gesamte 
Steuerung erfolgt über die Ta- 
statur. 


Folgende Tasten sind zur 
Steuerung belegt worden: 

E-.nach oben, X - nach unten, 
S-nach links, D- nach rechts. 
Zusätzlich werden in einigen 
Leveln noch die Tasten W links 
oben und Z - links unten benö- 
tigt. Neben den Gefahren von 
außen müssen Sie auch auf Ih- 
ren Treibstoff-Vorrat achten, 
der kontinuierlich abnimmt. 
Aufgetankt wird durch 
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die Zerstörung von Bodenzie- 
len. Hat man vier Leben verlo- 
ren, so kann man mit der Taste 
”K” eine Revange fordern oder 
über die Taste ”O” ein neues 
Spielfeld erstellen lassen. (Das 
Erstellen dauert allerdings 40 
Sekunden). 


Die Eingabe: Scramble ist ein 
dreiteiliges Programm. Die er- 
sten beiden Teile sind Basic- 
Programme und werden unter 
den Namen "SCRAMBLE 1” 
bzw. ”SCRAMBLE 2” abge- 
speichert. Teil 3 ist ein MC- 
Programm, zu dessen Eingabe 
Sie am besten den MC- 
Checksummer an Adresse 
12680 verwenden. Dieser Teil 
wird mit dem Befehl 
S”SCRAMBLE 3” ,8(,1),1C00, 
25E0 abgespeichert. 
Jean-Paul Gönot 


Name: Scramble 
Computertyp: C 16/116/+4 
Lauffähig: Kass. od. Disk 


Besonderheiten: Das Reak- 
tionsvermögen wird stark ge- 
fordert 








PROGRAMME za 
| | 


C-16 LISTING + CHECKSUMMEN (OC V1.0) 








18 SCNCLR <242> 
28 FORA=980T0939:READD: :POKEA, D:NEXTA <234> 
30 SYS989 <126> 
40 DATA160,0,132,217,132,219,169,208,133,218 

‚169,56,133,220,162,7,177,217 <186> 
50 DATA145,219,200,208,249,230,218,230,220,2 

02,16,242,96 <1908> 
60 POKE65299, (PEEK (65299) AND3) ORS6 <73) 
70 POKE65298, (PEEK(65298)AND251) <132> 
80 ADR=14336+8*408 ! <71> 
98 FORA=ADRTOADR+15:READD:POKEA,D:NEXTA <132> 
1080 DATA24,24,24,60,60,126,126,102 <220> 
110 DATA24,24,24,60,;60,126,126,102 <230> 


120 FORA=14336+8*94T014343+8*94 :READD: POKEA, 
D:NEXTA <34> 


138 DATA126,231,255.231,126,36,66,66 <194> 
140 FORA=-14336+8*46T014351+8*46 : READD : POKEA, 
D:NEXTA <189> 


150 DATA,0,0,32,48,56,96,64 <60> 


160 DATA®,0,0,32,48,56,96,64 <70> 
178 FORA=14336+8*33T014367+8*33: READD: POKEA, 
D:NEXTA <2057 
180 DATAO,255,131,254,196,196, 254,255 <110> 
198 DATA249,192,190,129,252,194,195,255 <231> 
288 DATA128,193,127,41,129,124,9,255 <247> 
218 DATAO, 224,24,70,254,1,1,254 <116> 
220 FORA=-14336+8*42T014343+8*42:READD: POKEA, 
D:NEXTA <141> 
230 DATA24,66,60,255,255,60,66,60 <111> 
240 FORA=14336+8*48'7014343+57*8:READD: POKEA, 
D:NEXTA - <250> 
250 DATA60,66,66,66.70,70.70,68 <78> 
260 DATA12,20,36,4,4,4,4,14 <23> 
278 DATA24,36,4,8,16,32,32,28 <26> 
280 DATA24,36,4,24,24,4,36,24' <235> 
290 DATA24,32,72,72,60,8,8,8 <92> 


308 DATA 60,32,32,56,4,4,36,24 <10> 








310 DATA28,32,32,56,36,36,36,24 <169> 
320 DATA62,2,4,4,8,16,16,16 <230> 
330 DATA24,36,36,24,24,36,36,24 <136> 
340 DATA24,36,36,28,4,4,36,24 <105> 
350 FORA=-14336+8*60T014343+8*61: READD: POKEA, 
D:NEXTA <36> 
360 DATA®,0,0,0,0,5,11,6,0,0,10,4,37,21,59,7 <227> 
378 COLOR4,1,8:COLOR®,12,6:COLOR1,15,0 <145> 
380 PRINT" {CLEAR} " :RESTORE39® : FORI=1TO23STEP 
4:READT$,G,F:GOSUB439 : NEXTI:GOT0469 <96> 
. 398 DATA"S{ SPACE2}C{ SPACEZYR{ SPACE2)A{ SPACE2 
YM{ SPACE2YB{ SPACEZ)L{ SPACE2YE",5,9,"{SU 5C22 
SI}",6,8 - <176> 
400 DATA" >{ SPACE} IHRE{ SPACE3}YMISSION:",10,11 <211> 
410 DATA'"DEN( SPACE) PLANET { SPACE) ZU { SPACE} DUR 
CHFLIEGEN({ SPACE} " ‚13,4, "UND SPACE}DIE( SPACE} 
ZENTRALBASIS { SPACE} ZU{ SPACE} ZERSTOEREN" ‚16,4 <106> 
420 DATA"{SPACE 5C3}".20,17 <36> 
430 Z=(F-1)*40+3072+G-1:FORJ=1TOLEN(T$) :CHAR 
1,F+J-1,6,"<":G0SUB458:CHAR1,F+J-1,G, "=" <132> 
440 VOL4:SOUND3,600+INT(300*RND(®)) ‚,5:CHAR1, 
F+J-1,6,MID$(T$,J,1) :NEXTJ: RETURN <194> 
458 SOUND3,600+INT(300*RND(®)) ,2:RETURN <126> 
468 GA=PEEK (174) : PRINT" { CLEAR}NEW{ DOWN2}" <178> 
478 PRINT"LOAD"CHR$ (34) "SCRAMBLE{ SPACE) 2"CHR 
$(34)","GA <236> 
4808 IF GA<>8 OR GA<>9 THEN PRINT" ( DOWN} " <13> 
490 PRINT" { DOWN3} RUN" <117> 
588 POKE 1319,19: POKE1328,13:POKE1321,13:POK 
E1322,13:POKE1323,13:POKE239,5 <61> 


ENDE DES LISTINGS 
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EEE PROGRAMME 


C-16 LISTING + CHECKSUMMEN (OC V1.0) 


10 GA-PEEK (174) 

20 IF A=0 THEN A=1:LOAD"SCRAMBLE{SPACEI3" ‚GA 
= 

30 TI$="000000" :POKEDEC("219F"),3 

A® COLOR1,2,7:COLOR®,15,3:COLOR4,1:VOL8 

50 REM *** COPYRIGHT BY JEAN-PAUL GENO 
T_ 1987 

60 POKE65298,0 

7® SCNCLR: PRINT" {RIGHT13 DOWN10}S{ SPACE} C{SP 


ACE}YR{ SPACE} A { SPACEYM{ SPACE} B{ SPACEYL{ SPACE} 
E":X=24:0=-1:FORI=1T0389 

80 ONINT(RND(®)*14)+1G0T099,90,90,100,1900,10 
0,110,110,120,120.120,110,130,140 

90 A=1:60T0150 

100 A=3:60T0150 

110 A=4:G60T0150 

120 A=6:60T015® 

138 A=2:60T0150 

140 A=5:G60T0158 

150 CHAR1,17,15,T1$:ONINT(A/4) +160T0160,170 
168 IFX+1>=25THEN80 : ELSEX=X+1:G0T018® 

170 IFX-1<=18THEN8® : ELSEX=X-1:6070188 

180 POKE9999+I,A:K*(INT(1/3))*3:POKE10399+K, 
INT(RND(®)*(ABS(X-11)))+4 

198 POKE10490+K,4:POKE10401+K,4:NEXT 

200 Q=Q+1: IFX< >24THENPOKE10389+N,1:POKE10789 
+Q,5:X=X+1:G0OT0208 





210 POKE10389+Q,7:POKE19789+Q,5: 1FN<=9THEN2® 


® \ 

220 POKE212,0:POKE213,0:POKE214,40:POKE215,3 
230 POKE217,13:POKE216,114:G0T033® 

240 PRINT"{CLEAR PINK SPACE}SCORE{SPACE24,SH 
IP" 

250 PRINT"{L.BLU SPACE11}S{SPACE)C{SPACEYR{S 
PACE}A{ SPACE}M{ SPACE}B{ SPACEYL{ SPACE}E" :PRIN 
TEPPENKY=; S S 

260 PRINT" { RIGHT38) FUEL" 

270 PRINT"{PURPLE RVSON SPACE49 RVSOFF}“; :PR 
INT" {WHITE}" 

280: POKE218,14:POKE219,39:POKE22@,191:POKE22 
1,15: FORI=1T088: POKE3991+I1,160:NEXTI 

290 POKE231,159:POKE232,40:POKE222,8:POKE223 


‚8 

300 POKEDEC ("1BFF"),0:POKEDEC("EO") ,253:POKE 
DECE(VEINT 3 

310 SYSDEC("1EBD") : IFPEEK (8607) =®THEN430 

3280 GOTO41® 

338 K=0:2=5 > 
340 M=Z:R=B:B=INT(RND(®) *2)+1: IFB=RTHEN34 
358 FORI=0T013:POKE11000+I+K,ABS(Z) :POKE1142 
0+I+K,ABS(Z+5) :NEXT 

3608 IFB=1THENZ=INT(RND(®)*(M-3) )+2:60T0380:E 
LSEZ=INT(RND (0) * (14-M) ) +M:GOT0370® 

379 FORJ=0T05 :POKE11800+K+I+J, ABS (M) :POKE114A 
93+1+J+K, ABS (Z+5) :NEXT:GOTO39® 

380 FORJ=0T05:POKE11000+K+I+J, ABS (Z) :POKE114 
88+I+K+J,ABS(M+5) :NEXT \ 








i . »1C58 D3 
Teil 3 " 31068 85 
»1C68 A9 
MC-LISTING MIT CHECKSUMMEN OVMIO >1C70 2E 
- >1c78 Di 
>1C00 A2 09°AQ 08 EB BD C8 9C ::6C >1C82 69 
1C08 99: C8 0C BD 98 0D.99 90 ::32 >1C88 85 
>1C10.0D BD 58 @E 99 58.0E BD ::4A >1C90 A9 
>1C18 20 OF 99. 28 OF C8 EB 27 ::1® >1C98 OF 
>1C20 FO 11:E® AF FO FA'E®O 77 ::8E >1CAQ D5 
>1C28 FO _F6'E® 9F FO F2 AC 38 ::6C >1CA8A9 
>1C30 1C EA.60 EB CB AC 04 1C ::A8 >1CBO 11 
>1C38 E® C7.DO C8 AC AB 23 00 ::83 >iCcB8 D5 
>1C4® A9 C8 85 DO A9 0C 85 DI ::24 >ICCca A5 
31C48 Ad 08 Bi DO C9 28 D® IF ::DC >1CC8 IC 
>1C50 A9 20 91 DO EA A5 DI 85 ::97 >1CD® .D2 
30 


390 K=K+2®: IFK<400THEN349 

498 GOTO248 

410 FORI-0T0399 :POKE7817 , PEEK(11000+1) :POKE7 
818,PEEK(11400+I) 

420 5YS8560 : IFPEEK (8918) =0THEN450 

438 IFPEEK (8697) -®THENSCNCLR: GOT052® 

440 POKE8697 , PEEK(8607)-1:5Y58922 

450 NEXT 

468 FORI-1T01000STEP5® 

478 VOL3:SOUND1,1,3:NEXT ; 

480 SYSDEC("21D®"):CHAR1,10,12, "SCORE" :CHAR1 
‚20,12,STR$ (PEEK(212)+PEEK(213)*256) Ä 
490 FORI-1923T0400STEP-5:SOUND1,1,2:SOUND2,I 
-40,1:NEXT:CHAR1,20,12,"*t*#*" 

500 POKE213,PEEK (213) +8:POKEB607,, PEEK (8607) + 


2 

510 CHAR1,20,12,STR$ (PEEK (212)+PEEK (213) *256 
) +" ( SPACE2}" :GOT066® 

520 PRINT"{RIGHTS DOWN5 RIGHT2}G4SPACEYALSPA 
CEYM{ SPACE}E{ SPACE3) -( SPACE4)O{ SPACE} V( SPACE 
}E( SPACE)R" :POKE65297,0:VOL8 

530 CHAR1,10,2,"SCORE{ SPACE4} "+STR$ (PEEK (212 
)+PEEK (213) *256) 

540 RESTORES99: FORI=1T024: READA1,C1:SOUND1,A 
1.39: SOUND2,C1,30:G0T056® 

550 GOTO668 

560 IFI=5THENCHAR1,4,10, "FORDERN{ SPACE3}SIE" 
570 IFI=10THENCHAR1, 20,10, "EINE(SPACE4)REVAN 
CHE SPACE2} " 








5880 NEXTI:GOT062®8 : 


590 DATA643,643,739,453,798,453,834,571,854, 
596,810,516,873,643,881,571,834,643 

600 DATA834,739,834,798,834,798,798,739,.810, 
779,770,715.770,643,798,739.739,685,739 

610 DATA 823,715,834,770,770,7790,715.770,643 
‚778,643 

628 CHAR1,15,16,"{SPACEYMIT{SPACE3 RVSONYK{R 
UVSOFF SPACE)" :CHAR1,3,20®, "DRUECKEN{ SPACE}SIE 
{SPACE2 RVSONYO{RVSOFF SPACE}YFUER ( SPACE2}NEU 
ES{SPACE}SPIEL" 

630 GETA$: IFA$="K"THENPOKEDEC("219F") ,3:60T0 
220 

640 IFA$="O"THEN3® 

6590 GOTO638 

660 FORI=1T059® :NEXTI:SYSDEC ("21D0") :POKE216 
‚„224:POKE217,13:SYSDEC("1E2A") 

670 FORI=5TO25 : POKE3231+ (I-4) *40,160:POKE323 
0+(I-4)*40,160:NEXTI 

680 CHAR1,35,10,"{RVSON SPACE4 RVSOFF}“ :CHAR 
1,35,17,"{RVSON SPACE4 RVSOFF}“:CHAR1,35,11, 
"{5\ SPACE2 C*}" 

690 CHAR1,35,16,"{RVSON C* RVSOFF SPACE2 
ON S\ RVSOFF}" :CHAR1,35,13."{SU SC ST}":CHAR 
1.35,14,"1{5J SC SK)" :ZD=-3556+40 

708 ZD-ZD+1:POKEZD,82:POKEZD-1,32: IFPEEK(ZD+ 
1)=32THEN70® 

710 POKEZD,32:VOL8:SOUND1 400,108 :SOUND2, 650 
‚180: FORI=1T0308: NEXTI:SYSDEC("21D®") 

729 GOTO230 

















RVS 


_ ENDE DES LISTINGS 


D2 38 E9 28 ::1E STCDB-IFEZ6OERFITESFEIFE SER 
E9 08 85 D3 ::A8 >1CEO AB 80 18 A5 D2 69 29 
ac D1 1C C9 ::E6 >1CE8 D2 A5 D3 69 08 85 D3 
28 91 D® A5 ::F6 >1CF0 D2 C9 29 F@ 03 AC FD 
D® 85 D2 18 ::28 >1CF8 A9 28 91 D2 68 C9 AO 
A5 D3 69 08 ::36 >1D00 Ei 60 AS D9 85 D3 A5 
c9 29.D® 14 ::5D >1D88.85 D2 28 E® 1C 60 D2 
18 A5 D4 69 ::FA >1D18 69 01 85 D2 A5 D3 69 
DS 69 00 85 ::A4 >1D18 85 D3 20 EQO IC AS D2 
c9 5E D® 21 ::ES >1D20 69 01 85 D2 A5 D3 69 
18 A5 D4 69 ::12 >1D28 85 D3 28 EO 1C 68 FF 
D5 69 808 85 ::BE »1D380 A5 D6 C9 08 DO 04 AS 
69 OF 85 D6 ::DA >1D38 C9 08 DB 03 AC 08 23 
85 D7 aC DI ::A9 >1D48 A5 D6 E9 81 85 D6 AS 
84 A9 2F 91 ::®D >1D48 E9 080 85 D7 68 008 028 
F® 083 AC 48 ::36 >1D50 A9 C8 85 D® A9 9C 85 


<227> 
<218> 


<24> 
527 
<23> 
<28> 
<697 
<181> 
<472 
<182> 
<247> 
<246> 


«41> 


%9> 
<89> 
<45> 
1272 
<199> 


<139> 
<182> 


<134> 
<192> 
247 


<53> 
<248> 
<24> 
<218> 
<102> 


<210> 


<13> 


<1> 
<116> 


<41> 
<24> 


ER 4.:B2 
85 ::4F 
Bl ::A8 
1C ::4D 
D® ::7E 
D8 '::DF 
18 ::78 
08 ::79 
187528 
0808 ::89 
FF: ::0D 
D72227°6 
38 ::CB 
D7 ::45 
00 ::ı19 
DI 2335 


C16-SA 4/88 





>1D58 AO 00 
>1D68 A9 2E 
>1D68 ®1 85 
.>1D7® Di C9 
>1D78 Cı DO 
>1D80 A5 DA 
>1D88 C9 28 
>1D98 A9 19 
>1D98 DA 18 
>1DAB® 69 98 
>1DAB C9 91 
>1DB® 20 08 
>1DB8 DD 69 
J1DCO D® 85 
>1DC8 03 DO 
>1DDO C9 94 
>1DD8 20 AB 
>1DEO 28 91 
>1DE8 D® 08 
>1DF® D9 1D 
>1DF8 1E A9 
»1EOO 38 A5 
)1EO8 DD EI 
>1E1O 00 08 
J1E18 28 91 
>1E20 29 91 
>1E28 00 08 
>1E30 AB 28 
>1E38 A9 23 
>1E40 91 DB 
J1EA8 DB C9 
J1ES® DB C9 
J1ES8 DB C9 
J1E6O A5 C6 
>1E68 38 E9 
>1E70 08 85 
>1E78 A5 DB 
>1E8Q DI 69 
>1E88 1E 01 
J1E9O DB A5 
1E98 C9 12 
J1EAO 01 AC 
J1EAB AC BO 
>1EBO DB 68 
>1EBB AC 08 
>1ECO 20 15 
>1EC8 IC 28 
>1ED® 6B IF 
>1EDB 20 4A 
>1EE® 1E 20 
>1EEB 50 1D 
>1EF® 20 E5 
»1EF8 22 EA 
»>1F00 38 A5 
>1F08 DD EI 
>1F10 00 91 
>1F18.00 00 
>ıF20 DO A5 
>ıF28 OF DO 
>1F30 01 60 
>1F38 20 9D 
>1F48 0C E® 
>1F48 1F 60 
>1F50 85 CA 
>1F58 A4 A9 
>1F60 AB 00 
»1F68 60 00 
>1F70 A9 0C 
>1F78 A2 00 
>1F80 FO 20 
>1F88 FO 1E 
>1F90 E3 18 
>1F98 69 08 
>1FAO EA 07 
>1FAS A9 03 
>ıFBO C9 OD 
>ıFBB 01 FO 
>1FCO 85 DB 
»1FC8 60 C9 
»ıFDO C9 03 
>ıFDB 01 85 
>1FEO DI 68 
>1FES EA A9 
>ıFFO D6 28 


C16-SA 4/88 


D® 904 ::3F 
DO 69 ::C3 
08 85 ::47 
D8 C9 ::A2 
FF FF ::F3 
AS DB 9E 
85 DB ::9C 
ı1D A5 B4 
A5 DB dE 
Bi DA ::EB 
91 DC 2C 
DC A5 ::C8 
c9 82 :: 

1D C9 ::F9 
AE 1D ::83 
1iE A9 ::38 
AB AO 3B 
c9 05 ::D® 
29 4C ::50 
20 08 ::ı3 
08 88 ::BA 
DC A5 B2 
68 FF ::12 
08 A9 ::36 
DB AO ::96 
D8 68 ::Bi 
91 .D8 ::Fö 
AB 29 ::4E 
A9 24 ::33 
28 Bi ::1P 
29 Bl ::EE 
2A Bi ::D5 
68 1F ::A7? 
A5S D8 ::E9 
D9 EI ::69 
DO BE ::3A 
D8 AS ::CD 
4C A4 ::BE 
28 85 ::6F 
DI 69 ::0C 
18 69 ::6C 
FO 03 ::95 
54 91 ::ED 
08 88 ::66 
06 23 ::8D 
20 48 ::BA 
1E 28 ::F7 
68 IE ::31 
20 2A ::C4 
1D 28 ::C7 
30 1D ::97 
4C 73 ::B® 
FF FF ::58 
DC AS ::EB 
20 AO ::ı1 
68 08 ::46 
01 85 ::C8 
D1 C9 ::8D 
E? DB ::36 
08 A9 ::B4 
9D 78 ::51 
4C 37 ::BO 
A9 01 57 
20 5F ::D9 
68 FF ::06 
DO 7A ::BF 
Al IF ::5B 
85 E3 ::37 
c9 21 ::67 
c9 21 ::51 
18 AS ::3E 
AS E4 ::2B 
ı1F EA: ::CO® 
ı1F 68 ::16 
EA EA ::B7 
1F C9 ::BE 
EI 81 ::62 
85 D9 ::5F 
Al 1F ::A3 
18 69 ::97 
08 85 ::F9 
C8 25 ::53 
D7 A6 ::9E 
8D BF ::B2 


>1FFB 
>2008 
>2008 
>2010 
>2018 
>2020 
>2028 
>2030 
>2038 
>2040 
>2048 
32058 
>2058 
>2060 
>2068 
>2078 
>2078 
>2080 
>2088 
>2090 
>2098 
>20AB 
>20A8 
>20B® 
>20B8 
>20C0 
>20C8 
>20D8 
>20D8 
>20E0 
>20E8 
>20Fd 
>20F8 
>2108 
>2108 
>2110 
>2118 
>2120 
>2128 
>2138 
>2138 
>2140 
>2148 
>2150 
32158 
32160 
>2168 
>217® 
>2178 
>2188 
>2188 
>2198 
>2198 
>21AQ 
>21A8 
»21B® 
>21B8 
>21C0 
>21C8 
>21D8 
>21D8 
»>21E® 
>21E8 
>21F® 
>21F8 


>»2200 
>2208 


>2210 
»2218 
2220 
>2228 
»2238 
2238 
>22408 
22248 
>2259 
22258 
22268 
32268 
222798 
2278 
2288 
»2288 
2298 


c9 83 FO 
85 DF 4C 


DO 22 DE 
26 A5 DE 18 


.. 


PrurTErrerT 
00008 


“00 00 00 20 00 0 
u. 0000. 


“00 00 00 00 00 m 0 0 a m 
Dr TEL DE TELTELTEr TE TerT 


“a 00 a0 00 an. 
. ... 


PROGRAMME EN 


.. 
® 


a» 00 00 00 20 00 00 un m0 00 00 0 me = 
DEP TIL Tr Er ur Tar . . 


>2298 69 01 85 DE AS DF 69 
>22A8 85 DF A5 DE C9 98 DO 
»22A8 AS DF C9 01 FO 12 ac 
»22B0 23 DE 85 DF A4C 68 208 
»22B8 00 85 DE 85 DF 4C 5D 
»>22C0 A9 080 85 DE 85 DF 4C 
»22C8 22 08 08 08 00 09 01 
»22D8 AD CE 22 C9 B1 FO 03 
>22D8 BD 1E A9 08 85 DE 85 
>22E0 AD 9F 21 C9 08 FO 15 
>22E8 9F 21 38 E9 01 8D 9F 
>22F8 28 FB 21 28 DO 21 20 
>22F8 21 AC BD 1E 60 FF FF 
»2300 A9 81 8D CE 22 60 A9 
22308 8D CE 22 68 AD CE 22 
>2310 01 FO 03:4C 5D 28 ac 
»2318 22 AS DE C9 98 DO 06 
»2320 DF C9 81 FO 03 AC 2F 
»2328 A9 00 85 DE 85 DF 608 
22330 CE 22 C9 ®1 FO 03 AC 
>2338 22 A4C DA 22 FF FF FF 
>2340 A2 00 A9 AB 9D 78 OC 
>2348 AB BC C9 28 DO 05 A9 
>»2358 9D AB BC E® 27 FO 04 


22358 AC 42 23 60 00 00 90 


>23680 AD FF 1B C9 03 DO 08 
2368 88 8D FF 1B AC 080 20 
>2370 AD FF 1B 69 01 8D FF 
>2378 60 AD 9F 21 18 69 31 
>2388 24 0C 60 21 A9 08 20 
>2388 A4 60 20 ES 1F 20 40 
»2398 AC 59 22 8D 11 FF A9 
>2398 8D FF 04 A9 AB AC 26 
>23A0 AB 00 A5 E® C9 23 DO 


>23A8 AS EI C9 25 DO OB A9 
>23B0 85 EO A9 24 85 Ei 4C 
»23B8 23 A5 E® 18 69 03 85 
>23C0 AS E1 69 08 85 Ei AD 
»23C8 FF 09 10 8D 11. FF Bi 
>23D8 8D FC 04 A9 FF 8D FE 
»23D8 C8 AD 12 FF 29 FC 11 
>223E0 8D 12 FF C8 B1 EO 8D 
>23E8 FF 68 FF D® 06 208 15 
»23F@0 18 90 D8 C9 FE DO 13 
>23F8 DO 85 D5 A5 DI 85 DO 
»2408 F2 03 2A F2 83 68 F2 
>2408 56 F2 03 68 F2 03 60 


‚2410 03 56 F2 03 60 F2 03 


>2418 F2 03 60 F2 083 71 F7 
>2420 2A FA 03 2A F2 03 71 
2428 03 68 F2 83 71 F2 083 
»2430 F2 03 60 F2 03 71 F2 
>»2438 81 F2 03 71 F2 03 81 
>2440 03 2A FA 03 2A F2 03 
»2448 F2 083 71 F2 03 81 F2 
>2450 81 F2 023 71 F2 03 81 
>2458 03 89 FA 83 2A F2 03 
>2468 F2 03 81 F2 03 71 F2 
»2468 81 F2 03 89 F2 03 81 
»2470 03 71 F2 03 81 F2 03 
>2478 F2 03 56 F2 03 60 F2 
»2480 71 F7 03 2A FA 03 2A 
»2488 03 60 F2 03 56 F2 03 
>»2498 F7 083 2A FA 03 2A F2 
>2498 60 F2 03 56 F2 03 68 
>24A0 02 CO FA 02 CO F2 03 
>24A8 F2 03 42 F2 03 AD FA 
>24B® CO F2 83 4D F2 03 42 
>24B8 03 2A DI 03 42 F2 03 
»24C0 F2 03 81 F2 83 89 F7 
>24C8 2A FA 03 81 F2 03 OF 
>24D0 083 02 F2 03 OF F7 83 
>24D8 FA 83 OF F2 03 02 F2 
>24E0 2A F2 083 68 F7 82 E3 
»24E8 03 56 DI 03 60 F7 82 
>24F8 FA 03 81 F2 03 81 F2 
>24F8 71 F2 03 68 F2 03 68 
»2508 83 56 F2 083 42 F2 03 
>2508 F2 83 2A F2 83 1E F7 
>2510 1E FA 03 71 F2.03 71 
>2518 03 60 F2 03 56 F2 03 
»2520 F2 083 42 F2 83 2A 8D 
22528 04 60 88 28 00 008 08 
>2530 FF FF FFFFFFFFFF 


FF 


ee 
oO 


a 
7 


EEE PROGRAMME 


>2538 FF FF FFFFFFFFFFFF ::39 
»2548 FF FF FFFFFFFFFFFF ::41 
>2548 FF FF FF FF FFFFFF FF ::49 


»2550 08 10 FO 20 70 FO 08 78 ::B5 
»2558 F® 08 60 FO 00 58 F@ 08 ::BD 
>2560 SF FF OF AF FF OF 2F 8F ::61 
>2568 FF OF 6F OF OF OF BF OF ::B9 


»2570 88 FO F@ FO 










325A8 80 49 00 ::4D- 
>25B0 4F @F OF OF OF OF OF OF ::31: 
>25B8 OF FF OF OF OF OF OF OF ::D9 
>25C0 A9 20 8D 72 OC 8D 73 ©C ::4C 
>25C8 8D 74 @C 
»250@ @C &D 77 
»25D8 60 088 


08 08 48 008 88 ::4D- 


8D 75 8C 8D 76 ::D6 


@C A9 82 85 CD ::14 
00 80 08 08 088 ::5D 








Wer hat nicht schon mal die 
fast artistischen Kunststücke 
bewundert, die ein Moto- 
Cross-Fahrer in einem Rennen 
vollbringt? In unserem Spiel 
KIKSTART 16 können Sie dies 
jetzt auch auf Ihrem Computer 
miterleben. Der Clou an die- 
sem Programm ist aber der 
Editor, der Sie in die Lage ver- 
setzt, selbst neue Cross- 
Strecken zu basteln. So bleibt 
das Spiel auf lange Zeit inter- 
essant. Also, stürzen Sie sich 
in das harte Leben eines 
Cross-Fahrers. 


Die Steuerung erfolgt mit dem 
Joystick in Port 1. Und zwar: 
links - Bremsen, rechts - Be- 
schleunigen, Feuer - Springen. 
Nicht nur auf der Straße, son- 
dern auch in unwegsamen Ge- 
lände kann problemlos gefah- 


ren werden, sogar auf dem. 


Zaun. Fahren Sie über eine 
Feder, so werden Sie hoch in 
die Luft geschleudert, was Sie 
dazu befähigt, größere Hinder- 
nisse zu überwinden. Mit ei- 
nem Baum, einem Loch oder 
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einem Stein sollte man aber 
besser keine Bekanntschaft 
schließen, da bereits eine Be- 
rührung das Aus bedeutet. Das 


gleiche gilt auch für Busse, bis. 


auf die Ausnahme, daß, wenn 
Sie einen Bus mit dem Hinter- 
rad zuerst berühren, nichts 
passiert. 


Das Spiel besteht aus vier Tei- 
len. Bitte achten Sie darauf, 
daß Sie die Namen der Pro- 
gramme genauestens einhal- 
ten. Um das Verfahren 
abzukürzen, bringen wir hier 
die SAVE-Befehle. 
SAVE”KIKSTART-LOADER” 
‚8(,1) 
S”KIKSTART-GAME” ‚8(,1), 
1000,3FFF 

(Im TEDMON oder im MC- 
Checksummer) 
SAVE”EDITOR-LOADER”,8 
(1) 
SAVE”STRECKEN-EDITOR” 
‚8(1) 


Wir weisen ausdrücklich darauf 
hin, daß keine Probestarts von 
unfertigen 


Programmteilen 





A 


vorgenommen werden dürfen. 


Die Teile 1, 3 und 4 sind 
Basic-Programme und sollten 
mit dem Checksummer OV20 
eingetippt werden. Für Teil 2, 
ein MC-Programm, verwenden 
Sie am besten den MC- 
Checker. 


Besitzer einer Disketten- 
Station können alle vier Teile 
auf einer Disk abspeichern. Für 
Datasetten-User ist das Ganze 
etwas schwieriger. Sie benöti- 
gen zwei Kassetten. Auf der er- 
sten speichern Sie die Teile 1 
und 2 ab, auf der zweiten die 
Teile 3 und 4. Die Bedienung 
ist dieselbe, Sie müssen nur 
darauf achten, daß, bevor Sie 
die Taste 9 (Beenden) drücken, 
die Kassette mit dem Spiel ein- 
gelegt wurde und zwar so, daß 


das File, welches dann abge- - 
- speichert wird, hinter dem Pro- 









en By 


grammteil "KIKSTART-GAME” 
steht. 


Die Bedienung des Strecken- 
Editors ist sehr einfach. Mit den 
Tasten 1-8 können Sie ein 
Strecken-Teil auswählen. Nun 
muß noch eingegeben werden, 
wie oft dieses Teil verwendet 
werden soll und wie hoch es 
sein soll. Die mögliche Anzahl 
der Bauteile liegt zwischen 1 
und 10, die maximale Höhe 
zwischen 3 und 6. Die Min- 
desthöhe ist immer 1. Mit der 
Taste 9 wird das Editieren 
beendet, und die erstellte 


Strecke wird abgespeichert. 


Michael Meissner 


Name: Kikstart 
Computertyp: C 16/116/+4 
Lauffähig: Kass. od. Disk 


Besonderheiten: Moto- 
Cross, Rennstrecken kön- 
nen selbstgebastelt werden. 


C16-SA 4/88 


- 


C-16 LISTING + CHECKSUMMEN (0C V1.0) 

18 REM ------------ 
20 REM --- KIKSTART LOADER --- 
3@ REM - WRITTEN + COPYRIGHT - 
40 REM ------- 1988 BY ----—-- 
'58 REM -— MICHAEL MEISSNER --- 
68 REM ------------2-- 
7@ GA=PEEK (174) 


88 COLOR1,2,7:COLOR4,1:COLOR®,1 i 
98 PRINT"({CLEAR DOWN2 RIGHT14 SU S*1@ SI}“ 
1808 PRINT"(RIGHT14 SB SPACE YELLOW}YKIKSTARTt 
WHITE SPACE SBY" 

110 PRINT"(RIGHT14 SJ $*1@ SK}" 

120 PRINT" {DOWN2 RIGHT2} (( GREEN} 1 {WHITE}) (SP 
ACE}ORGINAL{ SPACE}KIKSTART{ SPACE}MIT ( SPACE)O. 
RGINAL" 

138 PRINT" { RIGHT6} RENNSTRECKE( SPACE} .' 

148 PRINT" { DOWN2 RIGHTZ} (GREEN) ALWHITEN (SP 
ACE}KIKSTART{ SPACE)MIT( SPACE} EIGENER ( SPACE}R 
ENNSTRECKE ( SPACE} ." 

150 .INPUT "(HOME DOWN13 RIGHT3 YELLOW}WAEHLE 

N{ SPACE)}SIE{ WHITE} " ;W:W=INT (W) 

:168:IF W>2 OR W1 THEN 150 

170 :0ON W GOTO 198,250 

180 :: 

198 PRINT" {CLEAR GREEN}POKE{ SPACE}7712,0: (WH 
ITE}YNEW" 

200 PRINT" {DOWN3 YELLOW}LOAD ( WHITE} "+CHR$ (34 
) "KIKSTART-GAME" +CHR$ (34) " , "GA" ,"1 

216 IF GA=1 THEN PRINT" {DOWN} " 

228 PRINT" { DOWN4 SRANV SYSTSEACETTASALRED!" 

:230 POKE 1319,19:FOR A=1 TO 5:POKE 1319+A,13 
:NEXT:POKE 239,6: END 











>1120 088 

>1128.0A 

>1138 088 

MC-LISTING MIT CHECKSUMMEN OVM1® 31138 08 

£ >1140 08 

»1008 BA OA BA BA OA BA BA BA ::78 >1148 OA 
>1008 BA BA BA DA BA DA BA BA ::88 >1150 BB. 
>1010 OA OA BA OA OA OA BA BA ::88 >1158 09 
»1018 OA BA BA BA BA BA BA PA ::98 >1160 088 
»1020 BA BA BA BA BA BA PA BA ::98 >1168 98 
>1028 OA OA BA BA OA BA BA BA ::AD >1170 23 
>1030 BA BA BA BA BA BA OA OA ::AB >1178 98 
>1038 BA BA OA BA BA QA BA PA ::B® >1188 15 
»1040. BA OA BA BA BA BA OA BA ::BB >1188 3D 
»1048 BA BA OA OA BA BA BA BA ::CO® >1198 3C 
>1050 OA BA OA BA OA BA BA BA ::C8 >1198 3C 
»1058 BA BA BA BA BA BA BA BA ::DO >11AB 3C 
»1060 BA-OA BA BA BA OA BA BA ::DB >11AB 3C 
»>»1068 OA BA OA BA BA BA BA PA ::E® >11B® 3C 
»1070 DA BA BA BA OA DA BA PA ::EB >11BB 19 
>1078 BA BA BA OA BA BA OA BA ::FO >11CQ 48 
»>»1080 BA OA OA BA BA BA BA OA ::FB >11CB 3C 
»>1088 BA BA BA BA BA BA OA BA ::08 >11D® 1A 
»>»1090 BA BA OA BA DA BA BA PA ::08 >11D8 17 
>1098 988 08 200 08 80 20 088 08 ::AB »11ED 3C 
»10AD 28 BB 20 BB 0202-08 08 88 ::BO >11EB 3C 
»>10A8 20 88 20 08 20 28 80 88 ::BB S11F® 3C 
»10B2 28 28 BB B8 BD 28 088 B1-::CB >I1FB 3C 
>10B8. 21 81 81 81 21 81 81 21: ::EC 1200 3C 
»10CB ®1 15 15. 15 15 15 15 15 ::B® >1208 01 
>10C8 15 15 15 29 29 29 29 29 ::24 >1218 01 
»10D8 29 29.29 29 29 33 34 35_::8D >1218 01 
»108D8 81 81 85 86 087 2D 2E 2F ::FD >1220 09 

; >18E® 19 1A 1B 085 06 07 19 1A ::69 >1228 01 
- >»1B8E8 1B 2D 2E 2F 085 86 07 ®1 ::29 >1238 09 
: »>10F8 -01:01.21 01: 81 81 21 22 ::2C >1238 ®1 
' >18F8 23 01 281 281 08 88 88 08 ::34 ..>1249 808 
: >11808 80 88 88 14 14 14 14 14 ::69 >1248 08 
>11908 14 14 14 14 14 14 24 25 ::El >1250 88 
»1110 26 27 24 25 26 27 14 14 ::69 >1258 98 
>1118. 14 14 14 14 14 14 22 23 ::D3 »1260 iS 


C16-SA 4/88 _ 


<4a0> 
<32> 
<1> 
<55> 
<166> 
<90> 
<173> 
<55> 
<215> 


<93> 
<148> 


<26> 
<169> 


PROGRAMME EuEEl 


240 : 

258 PRINT"{CLEAR DOWN4 RIGHT. ZI (LCYAN}L {WHITE 
}) LSPACEIDIREEHERTT 4 

268 PRINT" { DOWN2 'RIGHT2} ({CYAN}2{WHITE}) (SPA 
CEYNAME { SPACE} DES ( SPACE} RENSTRECKEN-FILES" — 
278 INPUT" (HOME DOWN18 RIGHT! 6 YELLOW} IHRE(SP 





| ACEIYWAHL{WHITEY" WW 
280 IF W>2 OR W1 THEN 278 


298 ON W GOTO 318,368 

308 : 

318 PRINT'"{ CLEAR RIGHT11. RVSON RED)YDIRECTORY 
{WHITE RVSOEF}" 

320 PRINT" (RIGHT11} 
330 TRAP 250: PRINT" { PURPLE)" : DIRECTORY 
9348 PRINT"{DOWN RIGHT12 WHITE}=====)(SPACE R 
VSON GREEN}TASTE{ SPACE}DRUECKEN{ WHITE RVSOFF 











350 GETKEY A$:GOTO 250 
36@ INPUT" (HOME DOWN13 RIGHT3 PURPLE}NAME{SP 
ACE}DES{ SPACE} FILES ( WHITE)" ;N$ 

370 INPUT"{HOME DOWN15 RIGHT3 BLUE}IST{SPACE 
}DER{ SPACE} NAME SPACE} RICHTIG{SPACE WHITE} ( ( 





-RVSON CYAN)J{WHITE RVSOFF}/(CYAN RVSONYN{.WHI 





TE RVSOFF))“;J$:IF J$="J" THEN 390 
380 IF J$="N" THEN GOTO 368:ELSE 370 

39®8 PRINT" (CLEAR GREEN}POKE{ SPACE}7712,0:{WH 
ITEYNEW" 

480 PRINT"(DOWN4 YELLOW} LOAD( WHITE} "+CHR$ (34 
) "KIKSTART-GAME"+CHR$ (34) " ,"GA", "1 

410 IF GA=1 THEN PRINT" (DOWN) " 

420 PRINT"{DOWN4 YELLOWYLOAD{ WHITE) "+CHR$ (34 
) ;N$;+CHR$ (34) ", "GA", "1 

430 IF GA=1 THENPRINT" ( DOWN} " 

448 PRINT" (DOWN4 CYAN)SYS(SPACE}7424{ RED!" 








<42> 

<241> 
118) 
<224> 
<132> 
<112> 
<103> 
<195> 


<158> 
.<27>. 


<241> 
<83> 
£65> 


<50> 
<10> 


<11> 


<123> 
<74> 


<15> 
<94> 
<122> 


458 POKE 1319,19:FOR A=1 TO 8:POKE 1319+A,13 . 


:NEXT:POKE 239,9: END 
460 : 
ENDE DES LISTINGS 


00 28 88 89 ::Bi »1268 3D 3D 50 50 50 59 58 
00 BB 80 00 ::43 >1278 50 50 1C 1D 1E 58 50 
08 09 BA 09 ::38 >»1278 50 59 590 IC 1D ı1E 50 
00 28 88 08 ::49 >1280 580 58 1C 1D 1E 508 50 
09 BA 08 09 ::92 >1288 50 50 50 50 58 58 3C 
08 088 08 808 ::63 _ 21298730” ICH3C73C"IC7 IC IC 
00 BD 808 08 ::61 >1298 3C 3C 3C 3C 3C 3C 19 
00 28 88 08 ::69 >12A8 1B 19 1A 1B 59 50 58 
08 08 88 88 ::ıE »12A8 50 50 590 50 85 06 97 
00 88 0808 22 ::89 >12B® 06 07 05 86 07 50 50 
082 28 008 00 ::A4 >12B8 58 5® 5B 5C 5D 08 09 
08 15 15 15 ::42 >212C0 2A 2B 2C 08 09 OA 2A 
15 3D 3D 3D ::CD >12C8 2C 08 89 BA 2A 2B 2C 
3D 3C 3C 3C ::18 >12D® 89 BA 01 B81 091 01 81 
3C 47 48 49 ::OF >12D8 01 ®1 BB 8C BD 81 Pi 
19 1A 1B 3C ::B7 »12E0O 01 B1 8B 8C OD 01 081 
48 49 3C 3C ::D7 >12E8 OF 01 01 91 OB OC OD 
1B 3C 3C 3C ::93 >»12F® B1 Bl B1 01 BB 2C OD 
3C 3C. 3C 3C ::9F >12F8 01 BE OF 01 01 01 OB 
3C 3C 3C 47 ::C7 >1308 ®D 01 81 21 01 01 OB 
3C 3C 3C 3C ::59 >1308 8D ®1 ®1 BE OF 91 91 
3C 3C 3C 19 ::31 >1318 00 80 88 B81 01 B1 21 
3€C 3C 3C 16 ::BD >1318 00 00 08 08 00 09 08 
3C 3C 3C IC ::EC >13280 BA 00 88 09 BA 00 88 
16 17. 18 3C ::C9 >»1328 BA 00 08 08 98 908 01 
3C 3C 3C 3C ::69 >1338 81 81 @1 81 01 01 01 
IC 36 IC 3C : :26 >1338 01 81 01 01 081 21 01 
3C 16 17 18 ::72 >1348 01 01 81 81 01 01 091 
29 29.15 15 ::6F >»1348 01 B1 B1 B1 90 DD 90 
01 81 81 21 ::3E >1350 08 28 88 20 808 80 22 
0A 01 01 01 ::AB- >1358 08 080 BB B00 80 80 88 
01 81 81 88 ::86 >1360 008 88 22 23 00 20 08 
0A 01 81 01 ::D2 21368 80 20-00 28 088 09 22 
®1 21 01 08 ::96 >1378 08 80 08 28 .D2B OC OD 
0A 88.09 OA ::8C >1378 16:17 18 2A 2B-2C 16 
028 28 89 00 ::54 >1380 18 88 00 80 OB BC 8D 
00 88 088 28 ::52 21388 88 16 17.18 2A 2B 2C 
08 08 288 08 ::5A >1398 17 18 08 08 OB BC OD 
08 808 008 28 ::62 21398 16 17 18 2A 2B 2C 16 
15 15 15 15 ::E3! >13A0 18.00 08 BOB OC 6D 09 
3D 3B 3D 3D ;;52: »13A8-09 88.16 17.18 16-17 


<234> 
<7> 


50735: 
50 :; 
50:7 
503; 
900% 
SCcar% 
1A :: 
50 :: 
05 ; 
50 :: 
OA :: 
2B :: 
08 :: 
0125 
01 :: 
BE :: 
01 :: 
01° :: 
8C":: 
8C :: 
08 : 
01 ;:: 
09 ::; 
09 :: 
01 :: 
01 ::; 
8177: 
01 :: 


EEE PROGRAMME 


>13B0 08 80 OB OC OD 08 B1 22 ::6C >1650 3C 3C 3C 3C 5@ 50 58 50 ::DE »18F0 83 84 02 083 04 02 03 04 ::7A 
>13B8 03 084 16 17 18 00 08 QE ::5C >1658 50 64 64 64 64 64 64 01 ::52 »18F8 02 03 04 02 03 04 02 03 ::79 
>»13C0 OF 08 00 08 00 00 020 08 ::E2 >166@ 0B @C OD 01 64.64 64 64 ::EC >1908 04 3C 3C 88 09 BA 3C 3C ::56, 
>13C8 ®B ®C OD 08 00 2A 2B 2C ::AE >1668 64 64 64 64 64 6C 6D 6E ::4D >1908 3C 3C 3C 3C 3C 5E 5F 3C ::52 
>13D® 16 17 18 00 00 08 00 08 ::6F >1678 6C 6D 6E 64 64 64 64 64 ::CE >1918 3C 3C 3C 3C 47 48 49 50 ::13 
>13D8 00 00 28 B2 08 28 88 00 ::EB 21678 64 64 64 64 64 6C 6D 6E ::5D >1918 64 64 64 64 2A 2B 2C 64 ::41 
>13E0 08 ®0 00 20 08 08 00 00 ::F3 >1680 6C 6D 6E 64 6F 78 71 6C ::F8 >1920 64 64 64 2A 2B 2C 64 64 ::FA 
>13E8 08 ®1 81 ®1 01 91 081 81 ::ıE >1688 6D 6E 6C 6D 6E 01 05 086 ::5E >1928 64 64 6F 70 71 2A 2B 2C ::38 
>13F@ 01 15 15 15 15 15 15.15 ::E3 »1690 07 05 06 07 05 86 07 00 ::53 1930 2A 2B 2C 2A 2B 2C 2A 2B ::52 
>13F8 15 1F 28 21 15 19 1A 1B ::CF >1698 00 00 00 08 10 11 12 13 ::7A >1938 2C 2A 2B 2C_2A 2B 2C 2A ::5A 
>140@ 19 1A 1B 19 1A 1B 19 1A ::B9 >16AQ 10 11 12 13 81 38 39 3A ::1E >1940 2B 2C 2A 2B 2C 64 64 50 ::76 
>»1408 1B 28 28 33 34 35 29 2D ::94 »16A8 3B 01 24 25 26 27 24 25 ::C7 >»1948 50 58 58 50 50 3C 3C 28 ::5D 
>1418 2E 2F 2D 2E 2F 2D 2E 2F ::A2 >16B0 26 27 01 AC AD AE AF AC ::4B >1950 28 14 14 00 00 08 09 OA ::B4 
>1418 2D 2E 2F 2D 2E 2F 3C 3C ::7A >16B8 4D 4E 4F 08 00 08 00 00 ::A4 >1958 00 00 00 20 00 08 09 OA ::30 
>1428 3C 3C 3C 3C 3C 3C 3C 3C ::A4 »>16C0 08 20 00 00 00 QE OF 08 ::92 >1960 08 08 08 09 DA 00 00 08 ::27 
>1428 3C 3C 3C 3C 16 17 18 3C ::14 »16C8 20 00 00 20 O2 00 028 89 ::5E >1968 09 BA 00 00 B8 09 BA 00 ::42 
>1430 3C.3C 3C 3C 3C 3C 3C 3C ::B4 >16D0 BA 08 89 OA 00 00 08 00 ::43 >»1970 00 08 09 BA 00 02 OB OC ::89 
>1438 3C 47 48 49 05 06 87 3C ::608 >16D8 88 OB BC OD 08 09 BA 88 ::40 >1978 0D 08 00 20 00 08 08 OB ::F6 
>1440 47 48 49 3C 3C 3C 3C 3C ::BE >16E® 089 BA 08 09 DA 08 09 BA ::40 >1980 0C 0D 00 008 80 05 06 087 ::3F 
>1448 47 48 49 3D 3D 2A 2B 2C ::BC >16E8 08 09 BA 08 09 BA 08 08 ::BF >1988 19 1A 1B 2D 2E 2F 2D 2E ::9E 
>1450 2A 2B 2C’ 2A 2B 2C 2A 2B ::6D »16F0 00 08 00 20 00 00 28 90 ::06 >1998 2F 19 1A 1B 05 06 07 28 ::72 
>1458 2C 2A 2B 2C 2D 2E 2F 01 ::63 >16F8 00 08 02 00 00 20 ®0 00 ::OE >1998 28 28 28 28 28 22 23 3C ::AA 
21460 81 3C 3C 3C IC 3C 47 48 ::56 »1700 88 08 BOB YC OD 08 2A 2B ::27 >19A® 3C 3C 28 28 14 14 14 14 ::8D 
. 21468 49 30 31 32 3C 47 48 49 ::96 >1708 2C 00 88 28 80 08 00 08 ::4B >19A8 14 08 00 00 14 14 14 14 ::DD 
>1470 808 28 980 80 5E 5F SE 5F ::1E »1710 08 DO 28 OB 2C OD 08 2D ::45 »>19B0 28 28 28 28 28 3C 50 50 ::39 
21478 00 88 00 88 88 00 28 28 ::E4 >»1718 2E 2F'’00 08 00 08 ®@ 08 ::BB >19B8 50 3C 28 28 28 28 3C 50 ::8D 
>1480 28 28 28 28 28 3C 47 48 ::85 >1720 00 08 28 88 OB BC OD 00 ::11 >19C0 58 3C 28 28 28 28 28 28 ::C9 
21488 49 1C 1D 1E IC 1D 1E IC ::D8 >1728 2A 2B 2C 08 00 00 08 08 ::43 >19C8 3C 3C 50 50 50 50 50 50 ::E5 
21498 ID IE 1C 1D IE IC 1D 1E ::BE »>1730 08 08 08 08 88 IF 20.21 ::E9 >19D® 58 50 5B 5C 5D BE ®F 22 ::F8 
21498 3C 3C 3C 3C 3C:3C 3C 3C ::1C »1738 80 2A 2B 2C 08 08 08 88 ::D4A >19D8 23 36 37 4A AB 5E 5F 4A ::El 
>14AB 3C 3C 28 28 28 28 28 28 ::90 >1740 08 08 80 008 08 08 IF 20 ::38 >19E® AB 36 37 22 23 GE OF 08 ::49 
»>14A8 28 28 28 28 3C IC 3C 3C ::64 >1748 21 00 2D 2E 2F 08 00 08 ::AA >19E8 08 00 OB EC BD 08 BE OF ::6D 
>14B® 3C 3C 47 48 49 3C 3C 2D ::4E >»1750 00 00 02 00 80 08 08 IF ::5F >19F0 22 23 ®E OF 22 23 OE OF ::2D 
>14B8 2E 2F 05 06 87 19 1A 1B ::C6 >1758 20 21 88 2D 2E 2F 00 08 ::85 >19F8 22 23 BE OF 08 08 00 98 ::DF 
»14C® 2D 2E 2F 19 1A 1B 05 06 ::C5 >1760 88 08 08 08 00 08 08 28 ::B7 >1AQ® 14 14 14 14 14 14 14 14 ::EA 
>14C8 87 2D 2E 2F ®1 01 ®1 91 ::9D >»1768 33 34 35 00 16 17 18 16 ::09 >1A08 28 28 28 28 28 3C 3C 3C ::66 
>14D® 01 @1 01 21 @B 09 Q@A 01 ::9A >177@ 17 18 2A 2B 2C 16 17 18 ::B9 >1A1O 3C 3C 50 50 50 50 50 5B ::86 
>14D8 01 ®01 81 21 01 01 81 01 ::10 >1778 00 08 00 00 90 00 20 00 ::8F >1A18 5C 5D 88 08 5E 5F BE OF ::32 
>14E0 88 08 00 00 808 08 20 20 ::F4 >1780 88 88 08 00 008 88 28 208 ::97 >1A20 5E SF @E OF 5E 5F OE OF ::A6 
>14E8 00 02 20 80 08 00 00 28 ::FC >1788 80 08 08 00 08 80 00 00 ::9F >1A28 5E 5F OE OF SE 5F BE OF ::AE 
»14FQ0 08 00 002 00 00 00 00 00 ::04 >1798 08 00 00 00 00 00 BQ 008-::A7 >1A30 5E 5F GE OF 50 58 50 59 ;:EC 
»14F8 08 88 08 00 14 28 28 28 ::B8 >1798 00 08 14 14 28 28 28 28 ::4B »1A38 50 50 82 03 04 50 50 50 ::FB 
>1500 28 28 15 28 28 28 28 3C ::ı€C »17A8 14 14 08 08 900 08 008 14 ::93 >1A4Q9 58 58 50 02 03 84 50 50 :;19 
>1508 3C 3C 3C 3C 50 28 14 14 ::21 >17A8 28 33 34 35 15 15 2A 2B ::22 >1A48 3C 3C 28 28 14 14 00 28 ::DOA 
21510 14 14 @1 14 BE OF 28 28 ::AC >17B® 2C 15 2D 2E 2F 64 50 3C ;:AF >1A50 08 00 00 28 00 00 00 09 -—-6A 
»1518 28 28 14 14 14 01 14 28 ::67 >17B8 3C 28 14 00 OB ®C 8D 16 ::21 >1A58 00 90 08 02 98 00 00 208 ::72 
>1520 28 28 28 28 28 28 3C 50 ::Al »17C0 17 18 08 09 BA 50 58 59 ::9C >1A60 20 00 00 00 00 08 08 00 ::7A 
1528 58 50 50 50 50 64 64 51 ::89 >17C8 5A 3C 3C 3C 33 34 35 1C ::DF >1A68 00 00 00 00 00 20 00 00 ::82 
>»1530 64 64 64 64 64 64 50 3C ::89 >17D® 1D 1E 08 09 BA 02 03 04 ::EF >1A70 00 00 00 00 00 008 00 00 ::B8A . 
>1538 28 14 28 3C 3C 3C 3C 3C ::ıD »>17D8 08 00 00 ’OB BC OD 00 08 ::A5 >1A78 00 08 00 08 90 00 FF 00 ::8B 
21548 58 50 59 50 50 50 50 4A ::65 | >»17EO 08 05 06 07 88 09 OA 64 ::F3 >1A8Q 20 08 92. 00 00 20 00 08 ::9A 
>1548 4B 3C 3C 3C 3C 3C 28 08 ::70 >17E8 64 64 64 64 2A 2B 2C 64 ::OF >1ABB 20 20 08 00 08 08 08 08 ::A2 
1550 @B 0C OD 08 .14 28 3C 58 ::27 »>17F0 64 64 64 64 2A 2B 2C 64 ::17 >1A98 08 00 20 22- 00 00 00 00 ::AA 
31558 64 64 64 64 64 64 64 64 ::7D >17F8 50 50 50 50 50 50 05 06 ::F2 >1A98 00 00 00 00 20 20 08 08 ::B2 
>1560 64 6F:70 71 @1 2D-2E 2F ::98 »1800 07 08 00 0@ 28 OB OC OD ::1D >1AAQ 00 08 00 20 80 08 00 00 ::BA 
»1568 08 89 GA 2D 2E 2F 08 09 ::E9 >1808 00 64 64 64 64 64 64 6F ::24 >1AAB 00 20 20 00 20 08 80 08 ::C2 
»157® @A 2D 2E 2F 08 09 OA 2D ::3B >1810 78 71 64 64 64 64 08 OB ::DA >1AB® 00 00 08 20 00 00 00 00 ::CA 
»1578 2E 2F 08 89 @A 2D 2E 2F ::4F >1818 @C ®D 08 08 16 17 18 08 ::F6 >1ABS 00 20 00 20 08 80 08 908 ::D2 
21580 08 89 BA 2D 2E 2F 88 09 ::01 >1820 08 16 17 18 08 08 64 64 ::E5 >1ACO 08 98 08 00 02 00 00 008 ::DA 
»1588 OA 08 09 BA 08 089 BA 08 ::DE >1828 64 64 64 64 58 3C 28 14 ::D8 >1AC8 00: 00 08 28 00 00 88 80 ::E2 
>1598 09 BA 20 02 08 08 00 28 ::C2 >1830 09 08'090 28 08 00 08 00 ::48 >1AD® 08 00 20 20 00 00 00 00 ::EA 
»1598 08 00 00 00 08 00 00 08 ::AD >1838 00 08 02 00 00 00 00 08 ::50 >1ADS 00 20 20 00 08 00 20 00 ::F2 
>15A® 08 80 14 14 14 14 14 14 ::49 >1840 00 208 00 008 08 08 OE OF ::32 >1AEO 00 00 00 08 00 00 00 00 ::FA 
>15A8 14 14 14 14 28 28 28 28 ::95 >1848 08 08 08 08 00 08 @E OF ::3A S1AEB 00 20 00 20 00 90 00 00 ::02 
»>15B® 28 28 28 28 28 28 3C 3C ::91 >1850 08 00 80 008 02 08 14 28 ::34 >1AFO 20 00 20 200 00 00 00 08 ::OA 
215B823073C73023C7 36230 =73C023C7:;3BD »1858 28 28 28 28 33 34 35 28 ::EA >1AF8 008 00 00 00 00 08 00 08 ::ı12 
»15C0 50 58 58 50 50 50 50 50 ::15 >1860 28 00 80 08.00 08 08 00 ::AQ >1B00 08 22 20 00 20 28 00 00 ::ıB 
»15C8 50 50 64 64 64 64 64 64 ::Bi »1868 80 08 98 ®B 8C OD 08 88 ::36 >1B08 00 88 20 08 20 08 00 00 ::23 
»15D0 64 64 64 64 6F:78 71 15 ::57 >1870 082 83 04 02 03 04 82 03 :: Fi >1B1® 00 08 00 00 08 00 08 08 ::2B 
»15D8 2D 2E 2F 15 2A 2B 2C 15 ::07 »1878 84 00 20 08 88 80 980 08 ::94 >1B18 09 08 28 00 00 98 00 08 ::33 
>15E® 2D 2E 2F 15 2A 2B 2C 15 ::0F »1880 88 89 OA 14 14 14 14 14 ::28 >1B20 00 20 00 00 008 00 00 98 ::3B 
»15E8 2D 2E 2F 15 2A 2B 2C 15 ::17 >1888 14 14 14 1C 1D 1E 28 28 ::25 >1B28 00 08 00 00-06 08 00 80 ::43 
»15F® 2D 2E 2F 15 2A 2B 2C 2A ::C7 >1890 33 34 35 28 28 82 03 04 ::8B »>1B30 00 88 08 02 00 00 00 08 ::4B 
>15F8 2B 2C 15 2D 2E 2F 15.15 ::BE >»1898 02 03 04 02 03 04 02 03 ::19 >1B38 08 08 08 008 20 90 08 08 ::53 
»1600 00 00 08 00 00 08 080 08 ::16 »18AQ 04 02 03 04 982 03 04 02 ::21 »1B40 00 00 00 208 00 20 08 00 ::5B 
>1608 082 00 00 00 00 28 08 00 ::ıE »18A8 03 04 28 28 28 28 28'28 ::F3 >1B48 08 08 08 00 00 00 00 00 ::63 
»1610 08 Ba 00 00 00 08 00 00 ::26 >18B® 3C 3C 3C 3C 3C 3C 4A AB ::12 >1B50 00 08 20 00 00 08 08 08 ::6B. 
>»1618 00 00 14 14 14 14 14 OE ::92 >18B8 28 28 08 09 @A 28 33 34 ::AB >»1B58 08 08 00 80 00 00 00 00 ::73 
»1620 OF 14 14 14 28 28 28 28 ::09 »18C0 35 28 28 02 03 04 16 17 ::56 >1B60 00 00 00 20 00 00 08 00 ::7B 
>1628 28 28 28 28 3C 3C IC 3C ::E6 >18C8 18 2A 2B 2C 16 17 18 02 ::2D >1B68 00 00 88 08 02 08 00 00 ::83 
21630 47 48 49 3C 3C 3C 3C 28 ::60 >»18D8 03 04 3C 28 14 00 00 08 ::AB »1B70 00 08 00 00 00 00 00 00 ::8B 
»1638 28 28 28 28 28 28 28 14 ::4E >18D8 08 14 14 14 14 14 28 3C ::78 >1B78 08 20 00 08 00 00 20 00 ::93 
>1640 14 14 14 14 14 14 14 IF ::7E >18E0 3C 3C 3C 3C 08 89 BA 3C ::D4 >1B88 08 00 00 00 00 00 00 00 ::9B 
>1648 28 21 00 14 14 28 28 28 ::BC >18E8 3C 47 48 49 02 03 04 082 ::@E >1B88 08 00 00 08 20 00 00 00 ::A3 


4 C16-SA 4/88 


us) 


en 


>1B90 
>1B98 
>1BAQ 
>1BAB 
>1BBO 
>1BB8 
>1BCO 
>1BC8 
>1BD® 
>1BD8 
>1BE® 
>1BEB 
>1BFO 
>1BF& 
>1C00 
>1C08 
>1C18 
>1c18 
>1C20 
>1C28 
>1C3® 
>1C38 
>1C4@ 
>1C48 
>1C50 
>1C58 
>1C68 
>1C68 
>1C70 
>1C78 
>1C80 
>1C88 
>1C90 
>1C98 
>1CAa 
>1CAB 
>1CB® 
>1CBB 
>1CCQ 
1CCB 
>1CD® 
>1CDB 
>1CE® 
J1CEB 
>ICF® 
JICFB 
>1D2@ 
>1D08 
>1D1® 
>1D18 
>1D20 
>1D28 
>1D30 
>1D38 
>1D40 
>1D48 
>1D50 
>1D58 
>1D6@ 
>1D68 
>1D7@ 
>1D78 
>1D80 
° >1D88 
>1D90 
>1D98 
>1DA® 
>1DA8 
>1DB® 
>1DB8 
>1DCO 


»>1DC8 


>1DD® 
>1DD8 
»>1DEO 
>1DE8 
»>1DF® 
>1DF8 
>1E0® 
>1E08 
>1E1® 
>1E18 
»>1E28 
>1E28 


89-88 
80 88 
88 08 
80 08 
80 00 
88 08 
008 00 
00 008 
008 08 
00 08 
008 08 
08 88 
008 08 
00 08 
E2 C9 
20 45 
07 AS 
A4 62 
6D 19 
AF FO 
84 6B 
AO 098 
c8 AS 
85 C8 
65 D8 


8A 18 


E6 DB 
CD 1B 
60 28 
A4 DF 
20 CO 


:20 CF 


A6 2E 
20 CF 
02 E6 
cD IC 
08 AA 
A2 99 
co FF 
CF FF 
A9 08 
E2 20 
07 20 
60 8A 
68 20 
A9 49 
A9 008 
D3 A9 
03 8D 
64 03 
8D 67 
8D 61 
03 A9 
85 D® 
EA A9 
ı1D A9 
AD 08 
FF DO 
oF AA 


AB 60- 


A9 DE 
AO 08 
DO FB 
99 08 
AO 00 
De FB 
99 90 
20 90 
1E.20 
Ad 1E 
3E 24 
02 8D 
45 03 
8D 6B 
03 A9 
8D 6A 
AI 3A 
FF 8D 
99 08 
A9 DA 
Da F8 
86 BO 
OF C8 
26 A9 
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::8B 


aaa a ER ES 3 TS 
NS 
[+] 


= 
S 


::18 


::44 


»>1EIO 


»>1E38 
>1E48 
>1E48 
>1ES5® 
>1ES8 
>1E6® 
>1E68 
>1E70 
>1E78 
>1E80 
>1E88 
>1E98 
>1E98 
>1EAO 
»>1EA8B 
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>2B50 8D 3A @3 A9 25 8D 3B 83 ::E5 >32DF® 9E E9 00 85 9E 20 47 26 ::98 | >3090 

>2B58 A9 27 8D 3C 83 AC 76 28 ::62 >2DF8 68 20 7B 2E 20 98 2E 2@ ::6@ |. >3098 

>2B60 A9 20 8D 35 03 8D 36 83 ::DE >2E0® 78 26 18 A5 03 69 28 85 ::93 >30AO 

>2B68 8D 39 83 8D 3A 03 A9 26 ::D2 >2E08 03 A5 04 69 00 85 04 18 ::2D >30A8 

>2B70 8D 3B 03 A9 28 8D 3C ®3 ::1D >2E1@ A5 05 69 28 85 05 A5 86 ::32 >30B® 

>2B78 AC 76 28 A9 20 8D 35 083 ::70 >»2E18 69 80 85 06 18 AS 12 69 ::72 >30B8 

»2B80 8D 36 83 8D 39 83 8D 3A ::BB >2E20 28 85 12 A5 13 69 08 85 ::47 >38C8 

>2B88 03 8D 3B 03 A9 3A 8D SC ::Fl >»2E28 13 18 A5 3F 69 28 85 IF ::1C >30C8 

»2B90 03 AC 76 28 A9 20 8D 35 ::E8 >2E30 A5 40 69 00 85 40 18 AS ::A7 >30D® 

>2B98 03 8D 36 03 8D 39 83 8D ::22 >2E38 41 69 28 85 41 A5 42 69 ::3E >30D8 

>2BA® 3A @3 A9 3E 8D 3B 03 A9 ::7E >2E40 00 85 A2 18 A5 49 69 28 ::AC >30E9 

>2BA8 3C 8D 3C 083 AC 76 28 A9 ::89 >2E48 85 49 A5 4A 69 80 85 4A ::A4 >30E8 

>2BB®O 20 8D 35 83 8D 36 03 8D ::42 >2E50 18 A5 4E 69 28 85 4E A5 ::9E >30F® 

>2BB8 39 03 8D 3A 083 A9 3F 8D ::D7 >2E58 AF 69 00 85 4F 18 A5 92 ::E9 >30F8 

>2BCO 3B 03 A9 3D 8D 3C 03 AC ::B9 >2E60 69 28 85 92 A5 93 69 00 ::A8 >3108 : 
>2BC8 76 28 A9 20 8D 35 03 8D ::BQ >2E68 85 93 18 A5 9D 69 28 85 ::E4 >3118 : 
>2BD® 36 03 8D 39 083 8D 3A 03 ::CD >2E7® 9D A5 9E 69 00 85 9E 28 ::73 >3120 2C 33 08 3E 31 66 08 3A ::3C 
>2BD8 A9 3C 8D 3B 083 A9 3E 8D ::D6 >2E78 47 26 60 A9 28 AG 008 91 ::E5 33128 2@ 20 42 59 54 28 38 2C ::F7 
>2BEO 3C 03 AC 76 28 A9 20 BD :: OF >2E80 03 91 05 91 12 91 3F 91 ::27 331308 38 2C 38 2C 30 2C 30 2C ::Di 
>2BE8 35 03 8D 36 03 ED 39 03 ::Di >2E88 41 91 49 91 AE 91 92 91 ::AA 33138 30 2C 38 2C 30 @0 5A 31 ::1F 
>2BFO 8D 3A 03 A9 3D'8D 3B 83 ::FD >2E90 9D 68 A9 01 8D AB 083 68 ::B2 3140 70 08 3A 20 20 42 59 54 ::5A 
>»2C00 2® A5 2C A9 00 AB 08 99 ::7E >2EA® 60 20 92 2E 6@ AD 6B 03 ::CF 33150 2C 38 2C 38 2C 30 2C 36 ::31 
>»2C08 FF 37 88 DO FA A® 08 99 ::1B >2EA8 F@ @1 60 AD 68 03 FO 03 ::5E 53158 34 08 7F 31 7A 08 3A 20 ::26 
>2C10 IF 38 88 DO FA AD 34 83 ::37 >2EB® AC C8 2F AD 43 83 C9 01 ::E3 33160 20 A2 59 54 28 36 34 2C ::4® 
>»2C18 C9 16 DO 83 4C AC 2C C9 ::75 >2EB8 D® 05 A2 FA AC DE 2E C9 ::C8 33168 36 34 2C 30 2C 31 39 32 ::9C 
>2C20 15 DO 03 AC 59 2C C9 14 ::1E >2EC®O 03 D® 05 A2 D2 AC DE 2E ::8C >3170 2C 31 39 32 2C 31 39 32 ::C3 
»2C28 D® 03 AC 59 2C C9 13 DO ::09 >2EC8 C9 @5 D® 85 A2 AA AC DE ::77 33178 2C 31 39 32 2C 30 00 85 ::CE 
>»2C30 03 AC 66 2C C9 12 D® 83 ::FA >2EDO 2E C9 07 D® 05 A2 82 AC ::E6 >3180 31 84 08 3A 00 AO 31 BE ::71 
>2C38 4C 66 2C C9 11 DB 03 4C ::CE »2ED8 DE 2E D@ 02 A2 5A BE OF ::58 »3188 08 3A 20 20 42 59 54 28 ::Ci 
>2C40 73 2C C9 18 DO 03 AC 73 ::A® >2EEO FF 60 EE 60 03 AD 68 03 ::EC >3198 30 2C 30 2C 3® 2C 38 2C ::31 
>2C48 2C 4C 4C 2C AO 40 B9 FF ::73 >2EE8 C9 3A F@ 03 AC 1B 2F A9 ::DE >3198 38 2C 30 2C 34 2C 35 0@ ::10 
>2C50 3A 91 D2 88 D® FB AC 80 ::62 22EF® 30 8D 60 03 EE 61 83 AD ::FD >31A0 C3 31 98 08 3A 20 20 42 ::BO 
>2C58 2C A 40 B9 3F 3B 91 D2 ::B8 »2EF8 61 83 C9 3A FO 03 AC 1B ::7E >31A8 59 54 208 32 31 2C 31 37 ::dE 
>2C60 88 D® FB AC 80 2C A® 40 ::B4 >2F08 2F A9 30 BD 61 03 EE 62 ::FD 331B® 2C 31 32 2C 36 33 2C 35 ::Di. 
>»2C68 B9 7F 3B 91 D2 88 D® FB ::FA >2F08 03 AD 62 083 C9 3A F® 03 ::B7 >31B8 39 2C 35 39 2C 36 33 2C ::E2 
>2C7® AC 80 2C A® 40 B9 BF 3B. ::93 >2F1® AC 1B 2F A9 30 ED 62 83 ::F6 s31ca 31 32 08 DF 31 A2 08 3A ::CB 
»2C78 91 D2 88 D® F8 AC 88 2C ::31 >2F18 EE 63 03 38 AD 67 83 CD ::2C >31C8 20 20 42 59 54 20 30 2C ::97 
>»2C80 A2 08 91 03 EB 8A 91 IF ::C® >2F20 63 03 90 24 D® ıF 38 AD ::B2 >31D® 30 2C 30 2C 30 2C 30 2C ::71 
>2C88 E8 8A 91 4E EB 8A 91 05 ::7E >2F28 66 83 CD 62 03 98 19 D® ::5® >31D8 30 2C 38 2C 31 32 88 04 ::12 
>2C98 E8 8A 91 41 EB 8A 91 92 ::BA >»2F30 14 38 AD 65 083 CD 61 03 ::ıA 331EO 32 AC 08 3A 20 28 42 59 ::9i 
>2C98 E8 8A 91 12 EB 8A 91 49 ::BE »2F38 908 GE DO 09 38 AD 64 83 ::Al Y31EB 54 20 35 36 2C 39 32. 2C ::14 
>2CA® EB 8A 91 9D 60 AB 01 Bi ::1E >2F40 CD 60 83 98 83 AC 81 2F ::1B >31F® 38 38 2C 38 30 2C 37 30 ::16 
>2CA8 9D C9 28 DO 03 AC CF 2C ::83 >2F48 EE 64 03 AD 64 03 C9 3A ::3F >31F8 2C 31 36 3e 2C 31 36 31 ::1D 
>2CBO AD 87 FF C9 17 FB 03 4C ::40 >2F50 F@ 083 AC 81 2F A9 30 BD ::F6 3208 2C 38 38 00 24 32 B6 08 ::9® 
>2CB8 CF 2C C9 16 FO 83 AC CF ::0C >2F58 64 03 EE 65 03 AD 65 03 ::47 >3208 3A 28 20 42 59 54 20 38 ::71 
>2Cc® 2C A5 D2 C9 07 D6 088 AD ::9F >2F60 C9 3A FO 03 AC 81 2F A9 ::BB >321@ 38 2C 39 38 2C 39 36 2C ::69 
>»2CC8 46 03 D® 03 20 92 2E A9 ::52 >2F68 30 8D 65 83 EE 66 083 AD ::A3 >3218 38 33 2C 36 37 2C 33 2C ::24 
>2CD® @1 8D AC 03 AD 41 03 FO ::83 >»2F7® 66 03 C9 3A FO 03 AC 81 ::2C 33220 33 2C 30 00 3F 32 C® 08 ::54 
>2CD8 04 CE 41 03 60 AD 46 83 ::63 >2F78 2F A9 30 8D 66 03 EE 67 ::B6 33228 3A 20 28 42 59 54 20 30 ::51 
>2CE®O F®O 83 AC 57 2D A5 D2 C9 ::07 >»2F80 @3 AD 63 83 8D C9 BF AD ::89 >3230 2C 38 2C 30 2C 38 2C 38 ::E2 
>2CE8 87 FO 03 4C AF 2D AO 28 ::6D >2F88 62 03 8D CA OF AD 61 03 ::06 >»3238 2C 38 2C 30 2C 38 00 5F ::2E 
>2CF® Bi AE C9 20 D® 07 A9 00 ::1D »2F90.8D CB OF AD 60 83 8D CC ::F® »3240 32 CA 08 3A 20 20 42 59 ::2E 
>2CF8 85 D2 AC F9 2D C9 2D DO ::67 >2F98 OF AD 67 03 8D D7 OF AD ::0D >3248 54 20 30 2C 30 2C 38 2C ::F6 
»2D00 ®E A9 OD 8D 45 03 A9 ®1 ::FA >2FA® 66 03 8D DB OF AD 65 03 ::76 >»3250 38 2C 38 2C 31 32 38 2C ::53 
>2D08 8D 46 03 8D 68 03 60 A2 ::55 >2FA8 8D D9 OF AD 64 03 8D DA ::A8 >3258 36 34 2C 32 30 38 00 88 ::F4 
>2D10 88 8E AC 03 C9 09 DO 01 ::24 »2FB®O OF 60 A9 52 8D 17 FF A9 ::7D >3260 32 DA 08 3A 20 20 A2 59 ::62 
>2D18 68 C9 BA DO 01 68 C9 8C ::B9 >2FB8 43 8D 16 FF 60 A9 71 8D ::D7 3268 54 20 38 30 2C 31 36 2C ::72 
>2D20 D® 01. 60 C9 2E DO 01 60 ::30 >2FC® 17 FF A9 49 8D 16 FF 60 ::61 >»3270 31 39 32 2C 32 34 38 2C: ::6D 
>2D28 C9 2F D® @1 68 C9 3A DO ::9C >2FC8 CE 6A 03 FO @1 60 A9 OA ::96 33278 31 37 36 2C 31 37 36 2C ::B4 
>2D30 81 60 C9 3B DO 81 60 C9 ::63 >2FD® 8D 6A @3 AD 69 83 18 69 ::2C 3280 32 34 30 2C 31 39 32 00 ::35 
>2D38 3C D@ 01 60 C9 3D DB 01 ::D7 >2FD8 1E B® 07 8D 69 83 8D OF ::40 >3288 8E 32 DE @8 3A 00 A9 32 ::B7 
>»2D40 60 C9 3E DO 81 60 C9 3F ::15 >2FEO FF 60 A9 00 8D 68 083 A9 ::57 >3290 E8 08 3A 20 20 42 59 54 ::23 
>2D48 D® 01 60 20 92 2E 60 A9 ::BD >2FE8 64 8D 69 03 60 FF FF FF ::A7 3298 20 30 2C 38 2C 30 2C 30 ::3E 
>2D50 ®1 8D AC 03 E6 D2 60 A5 ::BA >2FF®O FF 16 30 F2 87 3A 20 20 ::01 >32A® 2C 30 2C 30 2C 31 2C 31 ::60 
>»2D58 D2 C9 08 FO 03 4C 77 2D ::29 »2FF8 42 59 54 20 31 33 30 2C ::6E >32A8 00 C8 32 F2 08 3A 20 20 ::2C 
>2D6® CE 45 03 DO @B AS 00 8D :-AB »3000 31 33 30 2C 38 2C 38 2C ::OF >32B0 42 59 54 20 35 2C 34 2C ::2F 
32D68 41 03 A9 00 8D 46 083 68 ::51 >3008 33 32 2C 33 32 2C 31 33 ::10 >32B8 33 2C 31 35 2C 31 34 2C ::AA 
32D70 A9 07 85 D2-AC 7A 2D C6 ::EE »3010 30 2C 31 33 30 00 38 30 ::1F >32C0 31 34 2C 31 35 2C 33 0® ::49 
>2D78 D2 60 20 78 26 28 7B 2E ::C2 >»3018 F3 07 3A 20 20 42 59 54 ::B2 >32C8 E3 32 FC 08 3A 20 28 42 ::27 
>2D80 38 A5.03 E9 28 85 03 A5 :: FF »3020 20 31 37 2C 31 37 2C 31 ::22 >32D® 59 54 20 30 2C 30 2C 30 ::D3 
>2D88. 04 E9 00 85 04 38 A5 05 ::AE >3028 37 2C 31 37 2C 31 37 2C ::39 >32D8 2C 38 2C 30 2C 38 2C 30 ::8A 
>2D99. E9 28 85 05 A5 06 E9: 00 ::55 »3030: 31 37 2C 32 31 2C 38 0808 ::98 .>32E0 2C 33 00 06 33 06 089 3A ::EE 
>2D98 85.06 38 A5 12 E9 28 85 ::A2 >3038 3E 30 F8.07 3A 00 4E 30 ::CE >32E8 20 28 42 59 54 20 31 34 ::FF 
>2DAO 12 AS 13 E9 00 85:13 38 ::69 »3040 02 08 3A 20 20 BO 47 20 ::61 >32F0 2C 32 33 2C 32 30 2C 32 ::D9 
>2DA8 AS 3F E9 28 85 3F A5 48 ::E9 >3048 24 33 42 30 30 00 54 30 ::44 >32F8 308 2C 31 37 2C 34 36 2C ::ES 
>2DB® E9 00 85 48 38 A5 41 EI ::5A >3050 0C 08 3A 08 5A 30 16 08 ::06 >3300 34 30 2C 38 36 ®® 2C 33 ::05 
>2DB8 28 85 41 A542 E9 00 85 ::56 >3058 3A 00 72 30 20 08 3A 3B ::16 >3308 10 09 3A 20 28 42 59 54 ::C6 
>2DCO 42 38 AS 49. E9. 28 85 49 ::1A >3060 2® 28 AB AB AB 20 AD AF ::47 >»3310 20 38 36 2C 38 38 2C 32 ::51 
>2DC8 A5 4A E9 80 85 4A 38 A5 ::EE >3068 A4 52 52 41 44 20 AB AB ::F3 >3318 34 2C 32 31 32 2C 32 3® ::ı1 
>2DD® 4E E9 28 85 4E AS 4F E9 ::7E >3070 AB 00 78 30 2A 08 3A 80 ::0B 3320 38 2C 31 39 32 2C 31 39 ::7B 
>2DD8 .00 85 4F 38 A5 92 E9 28. ::20 >3078 95 38 34 08 3A 28 26 42 ::2B. >3328-32 2C- 30 08 47 33 1A 89 ::08 
S2DEO. 85 92. AS 93 EI. 00 85.93.::B9 |. 3088 59 54 20 30 2C 31 2C 31 ::BF- >3330 3A 20 20 42 59 54.20 38 ::5A 
>2DES 38 A5 9D E9 28 85 9D AS ::6B >3088 2C 31 2C 31 2C 32 2C 31 ;:52 33338 2C 38 2C 38 2C 38 2C 38 :: 
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»>3348 2C 30 2C 3® 2C 38 08 67 ::77 >35E® EA EA EA EA EA EA EA EA :: FD >3880 FC FC AC AC AC AC AC FC ::58 
>3348 33 24 89 3A 20 20 42 59 ::EF >35E8 EA EA EA EA EA EA ER EA ::05 >3888 FF FC F3 CF CE CF FE FF ::96 
3350 54 28 38 2C 38 2C 38 2C ::FF >35F® EA EA EA EA EA EA EA EA ::0D >3898 FF FC FF FF AA FF AA FF ::A2 
23358 38 2C 31 32 38 2C 33 32 ::83 >35F8 EA EA EA EA EA EA EA EA ::15 >3898 FC FC 3C CC CC CC FC FC ::38 
>3360 2C 38 30 2C 35 32 88 BF ::iC >360@ A9 4D 8D 3B 05 20 8D DB ::88 >38A® EF EF FF FF FF 17 14 14 ::4F 
>3368 33 2E 089 3A 20 20 42 59 ::23 >3608 68 14 14 14 14 24 25 26 ::Cı >38A8 AB FF FF 03 FF FF 08 08 ::87 
>3370 54 28 32 38 2C 31 33 32 ::84 >3610 27 24 25 26 27 14 14 14 ::23 >38B8 EC EC FC FC FC 58 50 50 ::0C 
>3378 2C 34 38 2C 32 35 32 2C ::8D >3618 14 14 14 14 14 22 23 08 ::3B >38B8 88 03 OF OF OF 3F 33 3F ::81 
>3380 32 33 36 2C 32.33 36 2C ::A3 >3628 08 00 20 20 00 08 89 BA ::15 >38C0 FF 3F FF FD FF FF DF FF ::6C 
»3388 32 35 32 2C 34 38 80 95 ::99 >3628 08 08 28 20 20 928 88 88 ::5E >38C8 88 CO CO FO FO FO FC IC ::94 
3390 33 38 089 3A @8 B® 33 42 ::FE >3630 08 09 BA 08 09 OA 08 08 ::27 >38D8 FF CD FF 37 FF FF FF 37 ::28 
>3398 09 3A 28 20 42 59 54 28 ::D4 >3638 88 08 00 20 088 00 00 08 ::AE >38D8 FF F7 FF FF 3D FF 7F FC ::7A 
„233AQ 30 2C 38 2C 38 2C 38 2C ::43 >3640 089 BA 08 89 BA 08 09 BA ::CDO >38E8 FC FO FC FC 3C FO FC FC ::68 
-233A8 .36 .2C 30 2C 38 2C 30 08 ::EB >3648 00 08 20 00 98 20 08 88 ::7E >38E8 FF 3F F3 FF C7 3F 3C OF ::EB 
=233B0.CB 33 '4C @9 3A 20 28 42 ::EE >3650 08 80 08 00.00 08 08 068 ::86 >38F® .DF FF FF 7F F7 DF FF FF ::FC 
>33B8 59 54 28 31 2C 31 2C 38 ::C6 3658 08 08 08 08 08 08 88 08 ::BE >38F8 78 CC FC DC FC 78 CO FO ::EB 
>33C0 2C 33 2C 33 2C 33 2C 33 ::AF >3660 22 23 088 00 00 08 @8 08 ::FE >3900 00 08 20 00 00 08 00 008 ::39 
>33C8 2C 30 08 E6 33 56 89 3A ::31 >3668 88 08 08 08 08 080 22 23 ::A4 >3908 0C 03 00 08 08 980 01 55 ::82 
>33D0 28 20 42 59 54 28 30 2C ::Al >3670 08 00 08 28 20 08 8 08 ::A6 >3918 08 08 00 08 08 00 08 08 ::49 
>33D8 38 2C 38 2C 30 2C 30 2C ::7B >3678 08 08 28 28 15 15 15 15 ::D® >3918 DC DF 10 10 54 54 55 55 ::F2 
>33E0 30 2C 30 2C 30 08 04 34 ::87 >3680 15 15 15 15 3D 3D 3D 3D ::BA >3920 CO 08 08 20 88 00 00 54 ::B9 
>33E8 68 09 3A 20 28 42 59 54 ::F6 >3688 3D 3D 3D 3D 3C 3C 3C 3C ::38 >3928 03 OF 3E 32 3A F9 C9 E5 ::A3 
>33F0 28 33 2C 35 2C 35 2C 35 ::F7 >3698 3C 3C 3C 3C 47 48 49 3C ::190 >3930 C® FO BA 8C AC 65 EI F9 ::FE 
»33F8 2C 34 2C 31 30 2C 37 34 ::20® >3698 3C 3C 3C 19 1A 1B 3C 3C ::42 >3938 E5 C9 FB 3A 32 3D OF @1 ::9A 
>3400 2C 38 35 080 2D 34 6A 09 ::B6 >36A® 3C 3C 47 48 49 3C 3C 3C ::D8 >3940. F9 Ei E5 A4 8C 54 58 48 ::57 
»3408 3A 20 28 42 59 54 20 38 ::73 >36A8 3C 19 1A 1B 3C 3C 3C 3C ::1E >3948 00 00 00 48 80 50 64 DD ::85 
>3410 35 2C 32 32 2C 31 39 38 .::88 >36B8 47 48 49 3C 3C 3C 3C 19 ::88 3950 80 08 00 08 88 08 08 AC :;E9 
>3418 2C 32 34 35 2C 31 38 30 ::56 >36B8 1A 1B 3C 3C 3C 3C 47 48 ::A7 >3958 00 88 00 00 20 88 04 5D ::95 
>»3428 2C 31 37 36 2C 32 34 30 ::53 >36C® 49 5E 5F 3C 3C 3C 3C 3C ::28 >3960 08 00 08 81 02 85 1E 75 ::3F 
>3428 2C 31 39 32 00 4A 34 74 ::25 >36C8 3C 3C 3C 3C 3C 3C 19 1A ::69 >3968 AA AA 81 05 14 14 05 FD. ::9D 
>3430 09 3A 20 20 42 59 54 20 ::6D >36D® 1B 3C 3C 3C 3C 3C 16 17 ::23 >3970 AA AA 41 00 00 00 FF FB ::3B 
>3438 30 2C 30 2C 30 2C 38 2C ::DC >36D8 18 3C 3C 3C 3C 3C 3C 3C ::5A >3978 AA AA 48 50 14 14 50 7F ::B3 
>3448 30 2C 38 2C 30 2C 31 39 ::53 >36E® 3C 3C 3C 16 17 18 3C 3C ::5D >3980 2A 22 22 22 22 22 2A 08 ::B1 
>3448 32 00 6D 34 7E 09 3A 20 ::07 >36E8 3C 3C 3C 3C 3C 3C 3C 3C ::8E >3988 82 0A 22 02 82 02 02 08 ::69 
>3450 20 42 59 54 20 31 32 38 ::67 >36F@ 16 17 18 3C 3C 3C 3C,3C ::BA >3998 2A 82 82 2A 20 28 2A 08 ::2B 
>3458 2C 31 39 32 2C 30 2C 38 ::3D >36F8 3C 3C 3C 3C 16 17 18 3C ::86 >3998 2A 02 82 OA 02 02 2A 00 ::69 
3468 2C 39 36 2C 38 2C 32 34“::A2 >3700 AD 13 FF 29 03 089 38 8D ::E® »>39AQ 22 22 22 2A 02 02 92 08 ::71 
>3468 2C 31 34 31 00 91 34 88 ::9C >3708 13 FF 29 03 09 38 8D 13 ::C7 >39A8 2A 20 20 2A 02 02 2A 00 ::8F 
>3470 09 3A 20 20 42 59 54 28 ::AD »3710 FF AD 12 FF 29 FB 8D 12 ::EC >39B0 2A 2@ 28 2A 22 22 2A 00 :: 

»3478 31 33 33 .2C 33 33 2C 31 ::79 :23718 FF AD 07 FF 89 18 8D 07 ::59 >39B8 2A 02 02 08 08 08 08 08 ::D5 
>3480 32 2C 36 33 2C 35 39 2C ::B5 >3720 FF A9 70 8D 15 FF A9 49 ::76 >39C0 2A 22 22 2A 22 22 2A 00 ::ı1 
>3488 35 39 2C 36 33 2C 31 32 :: >3728 8D 16 FF A9 71 8D 17 FF ::D5 >39C8 2A 22 22 2A 02-02 2A 08 ::B9 
>3490 00 97 34 92 89 3A 00 88 ::5F >3730 A9 49 8D 3B 05 60 EA ER ::44 >39D® EF EF EF AA FE FE FE AA ::77 
23498 08 42 4E 45 20 57 45 49 ::23 | >3738 EA EA EA EA EA EA EA ER ::57 >39D8 AA AA FF FE FF BF FF FC ::52 
>34AQ 54 00 B5 34 E® 10 3A 20 ::6D >3740 EA EA EA EA EA EA EA ER ::5P >39E0 08 AA AA 08 03 AF BE FO ::46 
>34A8 20 4A AD 50 28 53 43 48 ::5E >3748.EA.EA EA EA EA EA ER ER ::67 239E8 @3 AF BE FO CO AA AA 08 ::DE 
>34B9 4C 55 53 53 08 BF 34 EA ::55 >3750 EA EA EA EA EA EA EA EA ::6F 239F0 CO AA AA OF 083 AA AA 00 ::28 
>34B8 18 3A 57 45 49 54 00 C5 ::16 >3758 EA EA EA EA EA EA EA EA ::77 >39F8 08 AA AA 00 CO AA AA OF ::5D 
>34C0 34 F4 10 3A 00 D9 34 FE ::9A >3760 EA EA EA EA EA EA EA EA ::7F >3A00 50 50 14 55 55 55 55 14 ::54 
»34C8 10 3A 28 28 4A 53 52 20 ::02 >3768 EA EA EA EA EA EA EA EA ::87 >3A08 14 14 14 55 55 55 55 14 ::A8 
>34D® 43 4C 45 41 52 49 4E 47 ::5C >3770 EA EA EA EA EA EA EA EA ::8F >3A10 05 085 14 55 55 55 55 14 ::83 
>34D8 00 E8 34 08 11 3A 20 20 ::29 >3778 EA EA EA ER EA EA EA EA ::97 >3A18 08 14 55 55 55 55 14 08 ::00 
>34E® 4A 53 52 20 B9 49 54 00 ::19 >3780 EA EA EA EA EA EA EA EA ::9F >3A20 04 11 11 15 11 11 11 00 ::39 
>34E8 F8 34 12 11 3A 20 20 4A ::08 >3788 EA EA EA EA EA EA EA ER ::A7 >3A28 14 11 11 14 11 11 14 08 ::62 
>34F0 53 52 20 58 55 54 54 008 ::AB >3790 EA EA EA EA EA EA EA EA ::AF >3A30 05 10 10 18 10 10 05 08 ::D2 
>34F8 FE 34 1C 11 3A 00 OD 35 ::4F >3798 EA EA EA EA EA EA EA ER ::B7 >3A38 14 11 11 11 11 11 14 00 ::66 
»>3500 A9 20 8D 73 OF 8D 74 OF ::CE >37A0 EA EA EA EA EA EA EA EA ::BF >3A40 15.10 10 14 18 10 15 08 ::72 
>3508 8D 75 @F 8D AB BF BD AC ::21 >37A8 EA EA EA EA EA EA EA EA ::C7 >3A48 15 10 10 14 10 10 18 08 ::57 
>3510 OF 8D AD OF 8D 23 OF 8D ::F5 >37B®O EA EA EA EA EA EA EA EA ::CF " »3A50 14 41 40 45 41 41 14 00 ::4B 
>3518 24 OF 8D 25 OF 8D 92 OF ::D9 >37B8 EA EA EA EA EA EA EA EA ::D7 >3A58 11 11 11 15 11 11 11 00 ;:7E 
>»3520 8D 93 @F 8D 94 OF 8D 6A ::D2 >37CO EA EA EA EA EA EA EA EA ::DF >3A60 04 04 04 04 04 04 04 00 ::OA 
>3528 OF 8D 6B OF 8D. 6C OF 8D ::1ıD >37C8 EA EA EA EA EA EA EA EA ::E7 >3A68 11 11 11 14 11 11 11 008 ::8A 
»3530 42 @F 8D 43 OF 8D 44 OF ::65 >37D® EA EA EA EA EA EA EA EA ::EF >3A70 10 10 10 10 10 10 15 00 ::8D 
>3538 60 EA EA EA EA EA EA EA ::CB >37D8 EA EA EA EA EA EA EA EA ::F? 1 93478 11 15 15 11 11 11 11 00 s:A2 
>3540 EA EA EA EA EA EA EA EA ::5D >37E®O EA EA EA EA EA EA EA EA ::FF >3A80 11 11 15 15 15 11 11 00 ::C6 
>3548 EA EA EA EA EA EA EA EA ::65 | >37E8 EA EA EA EA EA EA EA ER ::07 >3A88 04 11 11 11 11 11 04 00 ::36 
>3550 EA EA EA EA EA 00 08 08 ::3B >37F@ EA EA EA EA EA EA EA EA ::0F >3A90 14 11 11 14 10 10 10 00 ::A3 
»3558 00 00 00 20 20 08 08 08 ::8D >37F8 EA EA EA EA EA EA EA EA ::17 >3A98 14 11 11 14 14 11 11 08 ::CC 
3560 08 28 28 20 00 08 00 08 ::95 >3800 00 08 28 20 02 08 90 01 ::48 >3AAB 85 10 18 84 01 01 14 008 ::D6 
>3568 80 00 202 20 28 28 20 288 ::9D >3808 81 85 84 83 OF BE BE BF ::DC >3AAB 15 04 04 04 04 04 04 008 ::63 
»3570 088 00 08 088 21 081 B1 81 ::BF >3810 83 00 08 28 08 08 20 88 ::4B >3AB® 11 11 11 11 15 15 11 08 ::F2 
»3578 01 81 01 @1 01 01 15 15 ::FD >3818 03 BE 17 14 14 11 28 28 ::26 >3ABB 15 01 84 15 04 10 15 08 ::708 
>3580 15 15 15 15 15 15 15 15 ::A9 >3820 56 56 58 18 D4 D® CO CO ::06 >3ACO 00 04 84 08 00 04 84 08 ::42 
»3588 29 29 29 29 29 29 29 29 ::81 >3828 ®® 00 00 20 20 28 00 08 ::60 >3AC8 11 11 11 11 11 15 84 08 ::9B 
>3590 29 29 33 34 35 01 ®1 05 ::E7 >3830 88 088 08 00 28 80 28 58 ::C8 >3ADO 88 FF 55 AA 55 FF 08 08 ::52 
3598 86 87 2D 2E 2F 19 1A 1B ::2F 23838 34 14 84 30 FC EC EC FC ::E® >3AD8 84 28 28 29 65 59 DB C3 ::8E 
>35A0 05 086 87 19 1A 1B 2D 2E ::2E >3840 30 08 08 00 00 00 00 080 ::AB >3AEO 00 80 80 15 15 08 08 08 ::D7 
>35A8 2F 05 086 27 81 @1 @1 ®1 ::5E >3848 FF 3F FF FE FF BF FF FC ::48 >3AEB 11 11 11 15 04 04 04 00 ::24 
>35B0 01 81 @1 01 22:23 @1 @1 ::7A >3850 FF Fi 77 FD 5C 75 4D 55 ::OF >3AF® 82 82 08 88 28 28 82 82 ::E6 
>35B8 81 00. 08 08 08 00 EA EA ::A4 >3858 @F 3F 3A FA EA EA EA EA ::77 >3AF8 11 11 11 11 11 11 15 08 ::2A 
>35C® EA EA EA EA EA EA EA EA ::DD >3860 FF FF BA BA BA BA BA FE ::AF >3B08 88 81 ®1 @1 81 82 12 15 ::7B 
>35C8 EA EA EA EA ER EA EA EA ::E5 >3868 CB FO BÖ BC AC AC AC AC ::BB >3B08 55 45 31 FD ED EC FC 38 ::36 
>35D® EA EA EA EA EA EA EA EA ::ED >3870 FF FF EA EA EA EA EA FF ::77 >3B10 00 08 08 08 88 08 08 38 ::CB 
>35D8 ER EA EA EA ER EA EA EA ::F5 >3878 FF AB AR AA AA AA AA FF ::97 »3B18 E® 78 48 408 18 82 97 61 ::88 


38 C16-SA 4/88 


—— 


—r 


>3B20 61 88 83 4F GE OE OF 83 ::AC >3CC8 
>3B28 00 00 00 08 00 08 88 08 ::63 >3CD® 
»3B30 00 00 00 00 00 00 08 48 ::6B >3CD8 
>3B38 40 40 00 CO CO CO CO 28 ::B3 >3CEO® 
>3B40 00 00 00 08 00 Ba @4 05 ::BF >3CE8B 
>3B48 15 11 BC 3F 3B 3B 3F 8C ::7C >3CFO® 
>3B50 00 00 00 20 00 08 28 8C ::EB »>3CF8 
>3B58 38 5C 50 50 46 A® Al 58 ::F8 »>3D0208 
>3B60 58 62 60 53 43 083 83 88 ::99 »>3D08 
>3B68 00 08 0D 22 20 28 00 Q0B ::AS >3D10 
>3B70 08 00 00 20 80 80 48 DO ::EB >3D18 
>3B78 50 1®8 CD FO BO BO FO CB ::43 >3D28 
>3B80 00 08 00 900 90 08 21.01 ::CA >3D28 
>3B88 05 04 83 OF QOE QE OF 03 ::30 >3D39 


>3B90 00 00 00 00 00 00 00 03 ::E3 >3D38 
>3B98 GE 17 14 14 11 28 28 56 ::A8 >3D40 
>3BAQ 56 58 18 D4 DO CO CO 08 ::49 >3D48 
33BAB 00 00 00 BDO 28 00 Q® Q® ::ES3 >3D50 
>3BB® 00 00 00 90 80 20 59 34 ::FB >3D58 
33BB8 14 84 30 FC EC EC FC 38 ::17 >3D60 
33BC0 00 00 00 00 00 20 20 20 ::FB >3D68 
>3BC8 01 01 00 03 03 03 03 00 ::48 53078 
->3BD0 00 00 00 08 00 00 00 00 ::@B >3D78 
>3BD8 03 05 05 05 04 OA AA 55 ::41 >3D88 
33BEO 55 16 C6 F5 BA BO F® CO ::F6 53088 
33BEB 00 00 00 00 00 00 20 CO ::23 53D98 
33BF0 80 CO 00 00 60 08 18 8D ::4B 53098 
'33BF8 85 21 0C 3F 3B 3B 3F 0C: ::BC 53DA® 
>3C00 00 20 00 00 00 08 00-08 ::3C 33DA8 


>3C08 00 00 00 20 00 00 04 05 ::88 >3DB®d 


>3C10 15 11 0C 3F 3B 3B 3F @C ::45 >3DB8 
>3C18 80 00 88 08 00 BO BB 2C ::BA >3DCd 
>3C20 38 5C 50 50 46 A® Al 58 ::Ci >3DC8 
>3C28 58 62 60 53 43 03 83 08 ::62 >3DD® 
>»3C30 08 20 00 00 00 00 08 08 ::6C >3DD8 
>3C38 00 00 08 00 28 80 48 DO ::BA >33DEd 
>3C40 50 10 CO FO B® BO FO CO ::2C >3DE8 
>3C48 FF 3F FF FE FF BF FF FC ::44 >3DF® 
>3C50 FF F1 77 FD 5C 75 4D 55 ::13 S3tF8 
>3C58 OF 3F 3A FA EA EA EA EA ::7B >3E08 
>3C6®0 FF FF BA BA BA BA BA FE ::B3 >3E08 
>3C68 CO FO B@ BC. AC AC AC AC ::BC >3E10 
>3C70 FF FF EA EA EA EA EA FF ::7B S3E18 
>3C78 FF AB AA AA AA AA AA FF ::9B S3E28 
>3C80 FC FC AC AC AC AC AC FC ::5C >3E28 
>3C88 FF FC F3 CF CE CF FE FF ::9A >3E30 
>3C90 FF FC FF FF AA FF AA FF ::A6 >3E38 
33C98 FC FC 3C CC CC CC FC FC ::34 >3E48 
>3CA® EF EF FF FF FF 17 14 14 ::53 >3E48 
>3CA8 AB FF FF 03 FF FF 08 08 ::8B >3E50 
>3CB® EC EC FC FC FC 58 58 50 ::1® >3E58 
>3CB8 00 03 OF OF OF 3F 33 3F ::85, 33E60 
>3CCO FF 3F FF FD FF FF DF FF ::70 >3E68 


al 
04 
11 


co Ce FO FO FO 


10 REM --———- 11 
20 REM -----—-- EDITOR-LOADER ----—-——- 
30 REM - WRITEN AND COPYRIGHT 1988 BY - 
40 REM - MICHAEL MEISSNER - 
58 REM --------------- ._- 
60 


708 CLR:COLOR4,1:COLOR1,2,7:COLOR®,1 
80 GA=PEEK (174) 


90 PRINT"{CLEAR GREEN} POKE{SPACE}44,32:POKE{ 


SPACE} PEEK (44) *256,,0: { WHITE}NEW" 


100 PRINT"{DOWN3 YELLOW} LOAD(WHIT TE} "+CHR$ (34 


) "STRECKEN- -EDITOR"+CHR$ (34) "."GA 
110 IF GA=1 THENPRINT' { DOWN}" 
120 PRINT" (DOWN CYAN}YRUN{ RED)“ 


130 POKE 1319,19:FOR A=1 TO 4:POKE 1319+A, 13 


:NEXT: POKE 239,5:END 
140 : 


ENDE DES LISTINGS 


C16-SA 4/88 


<9> 
<198> 
<88? 
<90> 
<49> 
<118> 
<48> 
<183> 


<197? 
<58> 


$292; ; 


<69> 


<225> 
<198> 


ER 
3D- 
3C 
c7 
E7 
FC 
88 
088 
08 
54 
08 
3A 
AC 
32 
8Cc 
89 
88 
08 
02 
14 
08 
14 
22 
82 
20 
02 
®2 
02 
22 
08 
22 
02 
FE 
DE 
03 
c® 
03 
c® 
55 
55 
55 
55 
11 
ur 
10 
11 
10 
10 


FF 
FE 
Fo 


08 


08 :: 
00 :: 


08 

08 :: 
08 :: 
008 :: 


PROGRAMME 


08 :: 


>3E70 
>3E78 
>3E88 
>3E88 
>3E98 
»>3E98 
>3EA® 
>3EAB 
>3EB® 
>3EB8 
>3ECO 
>3EC8B 
>3ED® 
>3ED8 
>3EE® 
»>3EE8 
>3EF® 
»>3EF8 
>3F00 
>3F08 
>3F10® 
>3F18 
»>3F20 
»>3F28 
>3F30 
»>3F38 
»>3F40 
»3F48 
>3F50 
>3F58 
>3F608 
»>3F68 
>3F70 
»>3F78 
>3F80 
»>3F88 
>3F90d 
>3F98 
»>3FAQd 
»3FAB 
>3FB® 
»3FB8 
>3FCO 
»>3FC8B 
>3FD® 
»3FD8 
>3FEO 
>3FE8 
»>3FF® 
>3FF8 
>40008 


ENDE 


55 
0808 
80 
85 
2D 


20 


ac 


83 
32 
05 
F5 
08 
08 
3F 
49 


43 


48 


45 


DES LISTINGS (OVM) 








10 
20 
308 
40 
58 
68 
78 
80 
98 


REM ------------- 
REM ----- STRECKEN-EDITOR -—-—- 
REM -- WRITTEN AND COPYRIGHT - 
REM ------- 1988 ----------- 
REM ---------- BY --------- 
REM ---- MICHAEL MEISSNER ---- 
REM =------------ 
COLOR 4,1:COLOR ®,1:COLOR 1,2,7 


108 CLR:P=DEC("1098") 


11 


() 


120 PRINT"(CLEAR DOWN RIGHT15 WHITE SU S*8 S 


re 
138 PRINT"{RIGHT15 SB SPACE -—— W} EDITOR{ WH 
ITE SPACE SB}“ 
148 PRINT"{RIGHT15 WHITE SJ S*8. Sk)“ 


158 PRINT" {DOWN RIGHTZ} HT2) (KL PURPLEN L(HHITEN) (SP 


ACE}YSTRASSE" 
160 PRINT" (RIGHT2} (1 PURPLE}Y 2{WHITE}) {SPACEYE 
RDE" 


178 PRINT" {RIGHT2} (1 PURPLE}3{WHITEY) (SPACE}YB 


<222> 
<11> 
<169> 
<144> 
<237> 
<61> 
<26> 
<138> 
<95> 
<166> 
<168> 


<63> 


<1777 
<205> 


<20> 
<246> 


39 


BEE PROGRAMME 


AUM” = 
188 PRINT" RIGHT2} ( { PURPLE}4{WHITE}) SPACE} 
US" > 

198 PRINT" (RIGHT2) ( (PURPLE}S{ WHITE} ) {SPACE}L 
OCH" : 


200 PRINT" (RIGHT2} ((PURPLE} 6 {WHITE} ) { SPACE}YF 
EDER" 


Ta Ns {RIGHT2} ({ BURPLE}7 {WHITE} ) {SPACE}S 
EI " 


220 PRINT" (RIGHT2} ({ PURPLE}8{ WHITE} ) (SPACE)Z 
AUN" 


' 230 PRINT:PRINT" { RIGHT2} ( {GREEN} 9{ WHITE) ) (SP 
' ACE} BEENDEN" 


‚ 24@ INPUT "{HOME DOWN16 RIGHTS YELLOW} IHRE($ 


PACE}WAHL" ;W:W=INT (W) 

250 IF W£1 OR W>9 THEN 2498 

260 ON W GOTO 288,339,380,449,500,559,600,66 
8,838 


270 : 

280 PRINT"{CLEAR DOWN RIGHT15 BLUEYSTRASSE(W 
290 GOSUB 728 
308 FOR Z=® TO W 
320 P=P+Z:60TO 810 
330 PRINT" {CLEAR DOWN RIGHT15 BLUE)ERDE(WHIT 
348 
350 FOR Z=-® TO W 

POKE P+Z,20%*H+1:NEXT 

370 

380 PRINT" (CLEAR DOWN RIGHT15 BLUE}BAUM{WHIT 
39@ PRINT"(HOME DOWNZ RIGHT3 SPACE9} " :GOSUB 
720 2. 

SHON} ZU{ SPACE} HOCH{ FLASHOFF}" :GETKEY A$:GOTO 
398 
420 POKE P,20*H+2:POKE-P+1,20*H+3:POKE P+2,2 
8*H+4:P=P+3 
440 PRINT" (CLEAR DOWN RIGHT15 BLUE}BUS{ WHITE 
} ” 

20 
460 IF H>2 THEN PRINT"{HOME DOWN? RIGHT3 FLA 
478 FOR Z=® TO W 

480 POKE P,20*H+5:POKE P+1,2@*H+6:POKE P+2,2 
490 NEXT:GOTO 81® 

500 PRINT" (CLEAR DOWN RIGHT15 BLUE}LOCH(WHIT. 
510 GOSUB 720 

520 FOR Z=® TO W 

0*H+19:P=P+3 

548 NEXT:GOTO 819 
TE)" 

568 GOSUB 720 


HITEY“ 
318 POKE P+Z,2@*H:NEXT 
E" 

GOSUB 728 
369 

P=P+2:G0TO 818 
E“ 
400 IF H>2 THEN PRINT"{HOME DOWN? RIGHT3 FLA 
410 FOR Z=® TO W 
430 NEXT:GOTO 818 
= PRINT"{HOME DOWN? RIGHT3 SPACE9}" :GOSUB 
SHONYZU( SPACEYHOCH ( FLASHOFF) ";GETKEY As:GOTO 
8*H+7:P=P+3 
Ey“ 
53@ POKE P,20*H+8:POKE P+1,20*H+9:POKE P+2,2 
350 PRINT" {CLEAR DOWN RIGHT15 BLUE FEDER (MT 
570 FOR Z=@ TO W 





49 


<103> 
<246> 
<111> 
<153> 
<246> 
<210> 
<222> 


<18> 
<120> 


<152> 
<73> 


<118> 
<116> 
<118B> 
<238> 
<195> 


<47> 
<166> 
<168> 
<87> 
<245> 


<243) 
<145> 
<98> 

<228> 


<30> 
<53> 


<98> 
$205> 
<38> 
<32> 


<23> 
<119 


<91> 
<80> 
<83> 


<167> 
<164> 


<$44> 
<131> 
<133> 


Informieren Sie sich in der Normalausgabe von 
-  Gompute mit! 
Sie erscheint monatlich bei Ihrem Zeitschriftenhändler 


580 POKE P,28*H+11:POKE P+1,20*H+12:POKE P+2 
‚26*H+13:P=P+3 

598 NEXT:GOTO 819 

608 PRINT"{CLEAR DOWN RIGHT15 BLUEYSTEIN{WHI 

DE) „ > : 

618 PRINT"{HOME DOWN? RIGHT3 SPACE7)" :GOSUB 

728 

628 IF H>4 THEN PRINT'"(HOME DOWN?7 RIGHT3 FLA 
SHON}ZU{ SPACE} HOCH{ FLASHOFF} " :GETKEY A$:GOTO 
610 

638 FOR Z=® TO W 

648 POKE. P,20*H+14:POKE P+1,28*H+15:P=P+2 

658 NEXT:GOTO 810 

660 PRINT"{CLEAR DOWN RIGHT15 BLUE}ZAUN{WHIT 

E} ” 

678 PRINT"(HOME DOWN? RIGHT3 SPACE?) :GOSUB 

728 

688 IF H>4 THEN PRINT"{HOME DOWN? RIGHT3 ELA 
SHON} ZU{ SPACE} HOCH { FLASHOFF} " :GETKEY A$:GOTO 
678 

698 FOR Z=8 TO W 

708 POKE P,20*H+16:POKE P+1,2®*H+17:POKE P+2 
‚28*H+18:POKE P+3,20*H+19:P=P+4 

718 NEXT:GOTO 810 

720 INPUT"{HOME DOWN3 RIGHTS GREEN}WIE(SPACE 
JOFT{ SPACE} (1-18) {WHITE} " ;W:W=INT(W) 

738 IF W>10 THEN 720 

748 IF W1 THEN 720 

758 W=W-1 

768 INPUT "(HOME DOWNS RIGHTS CYAN}WELCHE(SP 

ACE}YHOEHE { SPACE} (1-6) (WHITE}" ;H:H=INT(H) 











778 IF H<1 THEN 768 
788 IF H>6 THEN 768 

798 H=-H-1 

88@ RETURN 

818 IF P>DEC("IC70") THEN 830 

820 GOTO 120 

838 REM -—-- BEENDEN --- 

848 FOR Z=® TO 45:POKE Z+P,0:NEXT 

850 POKE P+46,255: P=P+47 

860 PRINT"{CLEAR DOWN3 RIGHT3 BLUE}WIE( SPACE 


}SOLL{ SPACE}DIE( SPACE} RENSTRECKE{ SPACE}HEISS 
EN { WHITE)" 

87@ INPUT "{DOWN RIGHTS)" ;N$:IF N$="" THEN 8 
70 

888 IF LEN(N$)>16 THEN PRINT"{DOWN2 RIGHT6 P 
URPLEY ZU{ SPACE} LANGER ( SPACE} NAME ( WHITE) " :GET 
KEY A$:GOTO 868 

890 GA=PEEK(174) 

900 PRINT"{CLEAR GREENYMONITOR {WHITE} " 

918 IF GA<>1 THEN GOT0949 

920 PRINT" ( DOWN5}S{ YELLOW} "+CHR$ (34)N$+CHRS$ ( 
34)",1,1000,";HEX$(P) 

938 GOTO 988 

948 PRINT" ( DOWN5}S{ YELLOW} "+CHR$ (34) "@:" ;N$+ 











CHR$ (34)”,8,1000,";HEX$(P) 

950 PRINT"{DOWN2 WHITE}L{ YELLOW} "+CHR$ (34) "K 

IKSTART--GAME"+CHR$ (34) ", "GA 

968 PRINT" (WHITE. DOWN2)L( YELLOW} "+CHR$ (34) ;N 

$+CHR$ (34) "{ WHITE} ,"GA 

978 PRINT" (DOWN2 CYAN}G{ SPACE) 1D90( RED)" 

980 POKE 1319,19:FOR A=1 TO 5:POKE 1319+A,13 

:NEXT:POKE 239,6: END 
ENDE DES LISTINGS 


<5> 
<214> 


<284> 
<10> 


<131> 
<193> 
<154> 
<18> 


<28> 
<70> 


<1573 
<253> 


<114> 
<78> 


<773 
<135> 
<103> 
<81> 


<99> 
«132> 
<156> 
<62> 

<177> 
<107> 
<120> 
<235> 
<72> 

<55> 


<34> 
<29> 
<106> 
<228> 
<224> 
<198> 


<43> 
<8> 


<189> 
<11> 


<244> 
<172> 


<104> 
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Hier ist er endlich, der 
-Fußball-Manager für den Plus 
-4 und den C 16 mit 64 K- 

Speichererweiterung. Nach- 

dem die . Fernsehübertra- 

gungsrechte leider an einen 
privaten Anbieter vergeben 
wurden, ist damit zu rechnen, 
daß ARD und ZDF bei der über- 
tragung von Fußballspielen ins 

Hintertreffen geraten und allen 

Fußballbegeisterten nur wenig 

zu bieten haben. Um zumin- 

dest für Computerbesitzer ei- 
nen Ausgleich zu schaffen, ha- 
ben wir den Fußball-Manager in 
diese Ausgabe aufgenommen. 


Dieses Programm bietet jedem 
die Möglichkeit, seine Trainer- 
talente zu erproben, als Mana- 
ger zu fungieren und eine 

“Mannschaft an die Spitze der 

‘Bundesliga zu führen. Es 
wurde beim Fußball-Manager 
darauf geachtet, die verschie- 
densten Operationen sehr re- 
alitätsnah zu gestalten. So gibt 
es. natürlich einen Pokal- 
wettbewerb und auch eine 
Meisterschaftsrunde. Spieler 

“ können u. a. ausgewechselt, 
verkauft oder eingekauft wer- 
den. 


Erläuterung der Bedienung: 
Nachdem das Titelbild ge- 


Ci16-SA 4/88 


Name: Fußball-Manager 
Computertyp: C16+64K 
Lauffähig: Kass. od. Disk 


Fußball-Manager 
Sie Ihr Talent als Trainer in 
der Bundesliga erproben. | 
Fünf Optionen stehen zur 
Verfügung. 


zeichnet und die Titelmelodie 
ertönt ist, kann das Spiel durch 
Betätigen der SPACE-Taste 
gestartet werden. Zuerst muß 
natürlich ‚der Verein ausge- 
sucht werden, für den man als 
Trainer arbeiten möchte. Es 
kann zwischen den ersten acht 
Teams der ”Ewigen Tabelle 





Besonderheiten: Im Spiel | 
können | 


r, 


der Bundesliga” gewählt wer- 
den. Auch Ihr Lieblingsverein 
dürfte also dabei sein. Nach 


.der Festlegung auf den Verein 


fragt das Programm nach Ih- 
rem Namen und Alter. Nach- 
dem auch diese Daten einge- 
ben sind, erscheint das 
Hauptmenü, in dem Ihr eigener 


Das Superlisting | Fußball-Manager 


IIIASIS 













und der Kapitalstand Ihres Ar- 
beitgebers angezeigt werden. 


Sie können zwischen fünf Op- 
tionen wählen. Obwohl sich die 
Optionen weitgehend: selbst 
erklären, hier eine kurze 
Erläuterung: 

1. Vereinsinterner Goalgetter 





4 


BEE PROGRAMME 


Der Computer gibt die vereins- 
interne Torschützenliste auf 
dem Monitor aus. 


2. Transfer 
Hier können Sie einen Spieler 
verkaufen oder von der 
Transferliste einen Spieler in 
Ihre eigenen Reihen aufneh- 
men. Ebenso ist es möglich, 
einen Spieler von einem Kon- 
kurrenten zu kaufen. Vorher 
muß jedoch eine Transferver- 
handlung geführt werden, bei 
der allerdings der Computer an 
wichtigen Entscheidungen be- 
teiligt ist. Wenn Sie einen Spie- 
ler kaufen, muß ein Spieler der 
alten Mannschaft den Verein 
verlassen. Für diesen Spieler 
bekommen Sie keine Ablöse- 
summe. 


3. Spielen 
Die wohl wichtigste Option. Der 


Computer zeigt Ihnen an, ge- 
gen wen Sie spielen, in wel- 
chem Wettbewerb und an wel- 
chem Ort. Weiterhin sogar, in 
welcher Verfassung und mit 
welcher Spielmoral die einzel- 
nen Mannschaften in das Spiel 
gehen. 


Falls die Abfrage auf eine Aus- 
wechselung mit ”N” beantwor- 
tet wird, beginnt das Spiel. Mit 
"3" können Sie noch Änderun- 
gen vornehmen. 


Achtung bei Auswechselun- 
gen! Die gegnerische Mann- 
schaft wechselt ebenfalls. Es 
kann also passieren, daß auf- 
grund der Auswechselung sich 
die Moral des Gegners verbes- 
sert oder sich zu Ihren Gunsten 
verschlechtert. Sinn einer 
Auswechselung ist es natürlich 
das Spielgeschehen positiv zu 


S 


Cc-16 LISTING + CHECKSUMMEN -(0C V1.0) 


GOT012 


H FUSSBALL-MANAGER +4 


: (C) 1987 BY MZ SOFTWARE PRODUCTIONS 
: AUGUST-THIELESTR. 2 
5868 ISERLOHN 8 


<124> 
<89> 
<61> 
<190> 
<97> 
<226> 


beeinflussen und die Moral der 
eigenen, Mannschaft zu erhö- 
hen, denn man kann nur soviel 
Tore schießen, wie es der nu- 
merische Wert der Moral er- 
laubt. 


4. Auswechseln 

Hier können unmittelbar nach 
der Partie Spieler ausgetauscht 
werden. Dies ist zum Beispiel 
notwendig, wenn ein Spieler 
neu verpflichtet worden ist oder 
einfach schlecht gespielt hat. 


5. GAME OVER 

Diese Option brauche ich wohl 
nicht zu erläutern. Wenn Sie 
nicht wissen sollten, was sie 
bedeutet, probieren Siesie ein- 
fach aus. 


Hinweise zum Abtippen 
Das Programm ist vollständig 





in BASIC geschrieben und läßt 
sich dadurch bequem mit dem 
Checksummer OV20 abtippen. 
Der Autor des Programms hat 
für die Eingabe der Zeilen Ab- 
kürzungen verwendet. Solite 
deshalb nach der Eingabe ei- 
ner Zeile die Fehlermeldung 
"STRING TOO LONG ER- 
ROR” angezeigt werden, so 
müssen Sie in dieser Zeile 
ebenfalls Abkürzungen ver- 
wenden. Eine genaue Erläute- 
rung finden Sie im Handbuch 
auf den Seiten 202/203. Um si- 
cher zugehen, daß ein Tippfeh- 
ler die Eingabearbeit nicht zu- 
nichte macht, sollte man das 
Programm unbedingt vor dem 
Start abgespeichert haben. 
Viel Erfolg und Spaß als 
Bundesliga-Trainer! 


Martin Zuchner 





: FUER STATITSICHEN ANGABEN 
: : KEIN GEWAEHR 


10 DIMNN$ (18) ‚AL(18) ,SW$(18) ‚PO$(18) ‚RT(18), 
TR(18) ‚AT(18) ,MO(18),BC(18),LP$(18) ‚AQ(18) 3 
11 DIMGV$(18) ‚VA$(18) „VA(18),VB$(18) ‚VB(18), 
VC$ (18) ,VC(18) ,VD$(18) ,VD(18) ‚VE$(18) 

12 DIMVE(18) ,VF$(18) ,VF(18) ,VG$ (18) ‚VG(18) ‚V 
H$(18) ,VH(18) ‚DN$(80) ‚DN(80) ,BTC(18) ,PT(18) 
13 SCNCLR : GOSUB414 : GRAPHICQ : GOSUB466 :GOSUBB7 
6:MDE=8:DIMXZ (11) z 

14 RESTORE384 : FORI=1T018:READVA$ (I) ,VA(I): NE 
XT:RESTORE388: FORI=1T018: READVB$ (I) ‚VB(I):NE 
XT 

15 RESTORE392:FORI=1T018:READVC$ (T) ‚VC(T) :NE 
XT:CHAR,12,8,"{FLASHON SPACE}MOMENT { SPACE}BI 
TTE{ SPACE FLASHOFF} " 

16 RESTORE396 : FORI=1T018: READVD$ (I) „VD(I):NE 
XT:RESTORE399: FORI=1TO18:READVE$ (I) ‚VE(I):NE 
XT 

17 RESTORE403: FORI=1T018:READVF$ (I) ‚VF(I):NE 
XT:AUT=8 

18 RESTORE497 : FORI=1T018:READVG$ (IT) „VG(T):NE 
xT 

19 RESTORE410 : FORI=1T018:READVH$ (I) ‚VH(T) :NE 
XT:VC=9: JA=1987:HUN=1 : FA$="LEDIG" 2 

20 FORI=1T018:BC6 (I)=8:BC(T)=0:NEXT 

21 .FORI=1T08:QM(I)=@:NEXT 

22 GHJI$=" {SPACE} IN{ SPACE}DER{ SPACE}1. RUNDE{S$ 
BPACEY AUSGESCHIEDEN { SPACE} ! !":TRAP891:SP=® 

23 K=2000000:S1$=" ( SPACE}DU{ SPACE} HAST SPACE 
YDIE{ SPACE}MEISTERSCHAFT{ SPACE}VERFEHLT{ SPAC 
Z}!":LKJ=1:PUDEF".":Y=9:X=9 

24 M=1:F=1:T=0:N=0:B=@:V=8:L=9:0-8:J=0:H=0:T 


Dvonoubunwe 


42 


€143> 
<129> 
<67> 

<145> 
<156> 
<237> 


<170> 
712 
<41> 


<45> 
<125> 
<104> 
<46> 
<1083> 
<40> 


<123> 


<28> 





ER=H/2:CHAR, 13,8, "{ SPACE12}" <1> 
25 CER=®: PRINT" ( CLEAR} BITTE{ SPACE}GEBEN{ SPAC 
EYSIE{ SPACE} IHR{ SPACE} TEAM{ SPACE} EIN ‚WELCHES 
{SPACE} SIEBETREUEN{ SPACE}WOLLEN: ": I=4 <245> 
26 PRINT"WAHLE(SPACE}DAS{ SPACE}TEAM{ SPACE}MI 

Ti SPACE} CURSOR { SPACE} OBEN SPACE} UND{ SPACE}UN 
TENAUS, DRUECKE { SPACE} DANN { SPACE} SPACE ( SPACE} s 
x <199> 
27 CHAR, 15,7," {SPACE14}) " :CHAR,10,7, "TEAM: {RV 

SON} "+MN$ (I) +" { RUSOFF}" :CHAR, 15,6," SPACE15} 

” <97> 
28 CHAR1,15,6,MN$(I-1) :CHAR, 15,8," ( SPACE14}" 
:CHAR,15,8,MN$(I+1) <17> 
29 GETKEYOP$ <145> 
30 IFOP$="{ UP} "ANDI=>2THENI=I-1:G0T027:ELSEL 
FI<1THENI=2:60T027 <82> 
31 IFOP$="{ DOWN) "ANDI=<8THENI=I+1:60T027:ELS 
EIFI>8THENI=7: :GOTO27 <63> 
32 IFOP$=CHR$ (32) THENM$=MN$ (I) :LP=1:60T034 <162> 
33 GOTO27 <179> 
34 IFM$="B.MUENCHEN"THENGOSUBB25 <18> 
35 IFM$="1.FC{ SPACE}KOELN"THENGOSUB826 <32> 
36 IFM$="HAMBURGER { SPACE} SV"THENGOSUBB27 <233> 
37 IFM$="B.M'GLADBACH"THENGOSUBB28 <99> 
38. IFM$="E. FRANKFURT" THENGOSUB829 <156> 
39 IFM$="W.BREMEN"THENGOSUB830 <238> 
a0 IFM$="1.FC{SPACE}K' LAUTERN"THENGOSUBB31 <69> 
41 IFM$="VFB{ SPACE} STUTTGART"THENGOSUBB32 <199> 
42 FORI=1T018: IFAL(I)<=22THENMO(I)=3:G0T046 <93> 
43 IFAL(I) >22ANDAL(I)<=27THENMO(I)=4:G0T046 <A0> 
44 IFAL(I) >27ANDAL(I)<=32THENMO (I)=2.5:G0T04 

6 <54> 
45 IFAL(I} >32THENMO(I)=2 <186> 
46 IFI<=5THENMP=MP+MO (I) :GOT049 <62> 
47 IFI>SANDI<=8THENMK=MK+MO (I) :GOT049 <207> 
48 IFI>SANDI<=11THENMG=MG+MO (I) :GOT049 <172> 
49 _NEXT:MP=MP/5:MK=MK/3:MG=MG/3 :MO= (MP+MK+MG 

)/3 <91> 
59 PRINT" { CLEAR) DAS{ SPACE} AUFGEBOT {SPACE} VON 
{SPACE} " ;M$ <70> 
51 PRINT"SPIELER" ;TAB(25) ; "ALTER" ;TAB(33) ;"M 

ORAL" <1> 
52 FORI=1T048: PRINT" {5C}"; : NEXT . <36> 
53 FORI=1T018: IFI=12THENPRINT" { RUSON) ERSATZT 
ORWART: { RUSOFF)} " 2 '<133> 


54 IFI=13THENPRINT" {RVSON}ERSATZSPIELER: {RVS 
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GEN 

55 PRINTNO$ (I): TAB(26);AL(I);TAB(34):MO(I) 
56 NEXT:GOSUB607 

57 PRINT'"{CLEAR DOWN SPACEY}BITTE{ SPACE}GEBEN 
{SPACE} SIE{ SPACE} IHREN{SPACE}NAMEN {. SPACE)EIN 
{ SPACE DOWN) " : INPUT" {SPAC "»N$: [FN$=""THENS 
7 

58 IFLEN(N$) >9THENPRINT" (DOWN RIGHTYIHR{SPAC 
EYNAMELSPACE} IST{ SPACE} ZU{ SPACE}LANG {SPACE} ! 
".FORI=1T02908 : NEXT :N$="":GOT057 

59 IFLEN(N$)<2THENPRINT" { DOWN RIGHT} IHR{ SPAC 
EYNAME{ SPACE} IST{ SPACE) ZUt SPACE}KURZ { SPACE} ! 
-"; FORI=1T02009 : NEXT : N$="" :GOT057 

60 INPUT'"{DOWN SPACE}WIE{ SPACE} ALT{ SPACE}SIN 
Di SPACE}SIE{ SPACE} " ;AO 

61 IFAO<25THENPRINT" {DOWN SPACEYES{ SPACE)TUT 
{ SPACEYMIR{ SPACE} LEID-{ SPACE}SIEt{ SPACE} SIND{ 
SPACE} ZU{ SPACE} JUNG { SPACE} FUER ( SPACE DOWN Sp 
ACE}DIESEN{ SPACE} JOB({ SPACE} !" :GOSUB679 

62 IFAO>8OTHENPRINT" {DOWN SPACEYES{ SPACE}TUT 
{ SPACE}MIR{ SPACE} LEID- { SPACEYSIE{ SPACE} SIND{ 
SPACE} ZUt{ SPACE} ALT{ SPACE} FUER{ SPACE2 DOWN SP 



































ACE)} DIESEN { SPACE) JOB{ SPACE} ! " :GOSUB679 
FORI=1T08: IFI-8ANDLP=8THEN66 
IFI=LPTHENNEXT 


63 
64 
65 
66 
67 
5) 
68 
5) 
69 


5) 


70 
5) 
7ı 


TE$(I)=MN$L 


I) :NEXT 


ONLPGOT067,68,69,70,71,72,73,74 


AA$=TE$ (2): 
:HH$=TE$ (6): 
AA$=TE$ (1): 
:HH$=TE$ (6) : 
AA$=TE$ (1): 
:HH$=TE$ (6): 
AA$=TE$ (1): 
:HH$=TE$ (6): 
AA$=TE$ (1): 


4): HH$=TE$ (6): 


72 
4) 
73 
4) 
74 
4) 
73 
76 


AA$=TE$ (1): 
:HH$=TE$15): 
BA$=-TE$ (1): 
:HH$=TE$ (5): 
AA$=TE$ (1): 
:HH$=TE$ (5): 
REM 

COLOR®, 6,2: 


DD$-TE$ (3) 
JJI$=TE$ (7) 
DD$=-TE$ (3) 
JJI$=TE$ (7) 
DD$=-TE$ (2) 
JJI$=TE$ (7) 
DD$-TE$ (2) 
JJ$=TE$ (7) 
DD$=TE$ (2) 
JJI$=TE$ (7) 
DD$=TE$ (2) 
JJ$=TE$ (7) 
DD$=-TE$ (2) 
JJI$=TE$ (6) 
DD$-TE$ (2) 
JJI$=-TE$ (6): 


COLOR4,6,3: 


:FF$=TE$ (4) 
:SS$=TE$ (8) 
:FF$=TE$ (4) 
:S5$=TE$ (8) 
:FF$=TE$ (4) 
:SS$=TE$ (8) 
:FF$=TE$ (3) 
:5S$=TE$ (8) 
:FF$=TE$ (3) 
:SS$=TE$ (8) 
:FF$=TE$ (3) 
:SS$=TE$ (8) 
:FF$=-TE$ (3) 
:SS$=TE$ (8) 
:FF$=TE$ (3) 


SS$-TE$ (7) 
COLOR1 ,2 


:66$=-TE$ ( 
:GOT075 
:6G$=TE$ ( 
:GOT075 
:66$-TE$ ( 
:GOTO75 
:G6$=TE$ ( 
:GOT075 
:66$=TE$ ( 
:GOT075 
:66$-TE$ ( 
:60T075 
:66$=TE$ { 
: GOTO75 
:6G$=TE$ ( 
: SOTO75 


77 
78 
79 


REM HAUPTMENUE 

GOSUB607 :SCNCLR i 

TAG=TAG+7: IFTAG>3OTHENTAG=TAG-39:: VC=VC+1 

88 IFVC=12THENJA=JA+1:VC=1. 

81 PRINT"{HOME DOWN RVSON SPACE) VERMOEGEN {SP 

ACEYDES{ SPACE) VEREINS{SPACE18 RUSOFF} “ 

82 PRINT" {DOWN}KAPITAL(SPACE5)} :" ; : PRINTUSING 
HH 

83 PRINT" (DOWN RVSON SPACE} VERMOEGEN{ SPACE}D 

ES{ SPACEYMANAGERS{ SPACE17 RVSOFF}“ 

84 PRINT" { DOWN) KAPITAL(SPACES) :" ; :PRINTUSING 
"44H" ;MAG 

85 PRINT"(DOWN RVSON 

9 RVSOFFY " 

86 PRINT"({DOWN SPACE2 RVSON SPACE}1{SPACE RV 
SOFF SPACEYVEREINSINTERNE{ SPACE} GOALGETTER": 

PRINT"{DOWN SPACE2 RVSON SPACE}2{SPACE RVSOF 

F SPACEYTRANSFERS" 

87 PRINT"(DOWN SPACE2 RVSON SPACEY31SPACE RV 
SOFF SPACE)SPIELEN" :PRINT"{DOWN SPACE2 RVSON 
SPACE}A{ SPACE RVSOFF SPACE} AUSWECHSELN" : PRI 

NT"{DOWN SPACE2 RVSON SPACEYS{SPACE RVSOFF $ 
PACE)YGAME{ SPACE} OVER" 

88 PRINT" {DOWN SPACE2}IHRE{ SPACE}WAHL{ SPACE} 
: { DOWN2} “ 

89 GETKEYA$:CHAR,14,21,A$:A=VAL(A$) : IFA<10RA 
>5THEN89 

90 IFA=1THENGOSUB622:G0T077 

91: IFA=5THEN891 

92: IFA=2THEN709 

93 IFA=3THEN821 

94 IFA=-4THENFGJ=1 :G0SUB684 : 6GOTO76 

95 P=INT(RND(1)*2+1) 


SPACE}HAUPTMENUE { SPACE2 
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<220> 
<236> 
<231> 


<212> 


<253> 


<21> 


<213> 


<123> 


<37> 
<206> 
«1712 


<2532 


<217> 
<159> 
<151> 
<132> 
<102> 
<61> 
<9> 
<202> 
<128> 
<218> 
<127> 
<85> 
<«69> 
233 
<65> 
<0> 
<138> 
<44> 
<175> 


<60> 


<248> 


<19> 
g101> 


<202> 
<36> 

<252> 
<236> 
<197> 
<50> 

<183> 


PROGRAMME Eu 


96 IFP=2ANDLKJ=2THEN95 

97 ONPGOTO98, 291 

98 SCNCLR 

99 -IFAA$="B. MUENCHEN "ANDM=1THENGOSUB833 

100 IFAA$="1.FC{ SPACEYKOELN"ANDM=1ORDD$="1.F 
C{ SPACE} KOELN"' ANDM-3THENGOSUB834 ; 
101 IFDD$="HAMBURGER { SPACE} SV" ANDM=30RFF$="H 
AMBURGER{ SPACE} SV" ANDM=4THENGOSUB835 

102 IFFF$="B.M'GLADBACH"ANDM=40RGG$="B.M'GLA 
DBACH" ANDM-5STHENGOSUB836 

103 IFGG$="E. FRANKFURT" ANDM=5ORHH$="E. FRANKF_ 
URT"'ANDM=6THENGOSUB837 ae 
104 IFHH$="W. BREMEN" ANDM=-60RJJ$="W. BREMEN" A 
DM=7THENGOSUB838 

105 IFJJ$="1.FC{SPACE}K' LAUTERN"ANDM=7ORSS$- 
“1 ,FC{ SPACE}K' LAUTERN" ANDM=2THENGOSUB839 

106 IFSS$="VFB4 SPACE} STUTTGART" ANDM=2THENGOS 
UB849 

107 ONMGOTO108,1@09,110,111,112,113,114 

108 A1l$-AA$:M=2:G0T0135 

109 A1$=5S$:M=3:60T0135 

118 A1$-=DD$ :M=4:G0T0135 

111 Al$=FF$:M=5:60T0135 

112 A1l$=G6G$ :M=6:G0T0135 

113 Al$=HA$ :M=7:G0T0135 

114 Al$=JJ$:M=8:G0T0135 

115 GT=INT(RND (2) *MO) :KT=INT(RND(®) *YJ) :IFKT 
SGTTHENT=-T+2: ELSEIFGT=-KTTHENT=T+1 

116 QM(1)=QM(1)+KT:KK=KT: RETURN 

117 GT=INT(RND (8) *MO) :QW=INT(RND(®)*YJ) 

118 IFQWIGTTHENN-N+2 : ELSEIFQW=GTTHENN=N+1 

119 -QM(7) =QM(7) +QW:KK=QW: RETURN 

128 GT=INT(RND(®)*MO) :WE=INT (RND(®) *YJ) 

121 IFWE>GTTHENB=B+2 : ELSEIFWE=-GTTHENB=B+1 

122 QM(2)=QM(2)-+WE:KK=WE: RETURN 

123 GT=INT(RND (8) *MO) :X=INT(RND(0) *YJ) 

124 IFX>GTTHENV=V+2 : ELSEIFX=GTTHENV=-V+1 

125 QM(3)=-QM(3)+X:KK=X: RETURN 

126 GT=INT(RND(®) *MO) :Y=INT(RND(9) *YJ) 

127 IFY>GTTHENL=L+2: ELSEIFY=GTTHENL=L+1 

128 QM(4)=QM(4)+Y:KK=Y:RETURN 

129 GT=INT(RND(8)*MO) :Z=INT(RND(®) *YJ) 

130 IFZ>GTTHENO=0+2 : ELSEIFZ=6TTHENO=O+1 

131 QM(5)=QM(5)+Z:KK=Z: RETURN 

132 GT=INT(RND (8) *MO) :C=INT(RND(®) *YJ) 

133 IFC>GTTHENJ=J+2 : ELSEIFC=GTTHENJ=J+1 

134 QM(6)=QM(6)+C:KK=C:RETURN - 

135 SP=SP+1 

136 PRINT" { CLEAR} "SP; „SPIELTAG {SPACE} AM{ SPA 





CE)" ;TAG;".";VC;".";JA:FORI=1T040: PRINT" {CT} 


";:NEXT 

137 PRINT" { DOWN}GEGNER{ SPACE} :";A1$;TAB(25); 
"{RVSON SPACE}BL{ SPACE RVSOFF SPACE}PK" 

138 IFSP=10RSP=30RSP=50RSP=7THENPRINT' { DOWN 
RVSON} ZUHAUSE { RUSOFF SPACE} AUSWAERTS" :GOSUBE 
49:G0T0148 

139 PRINT" { DOWN} ZUHAUSE { SPACE RVSON}AUSWAERT 
S{ RVSOFF)} " :GOSUB849 :GOT0149 

140 IFM$="B.MUENCHEN"THENFAS-70508 

141 IFM$="1.FC{ SPACE}KÖELN"THENFAS-55000® 

142 IFM$="HAMBURGER {SPACE} SV'"THENFAS-56008 
143 IFM$="B.M'GLADBACH"THENFAS=30000 

144 IFM$="E.FRANKFURT"THENFAS-569008 

145 IFM$="W.BREMEN"THENFAS-359088 

146 IFM$="1.FC{SPACE}YK' LAUTERN"THENFAS=-3359® 
147 IFM$="VFB{ SPACE}STUTTGART"THENFAS=65508 
148 GOT0157 . 

149 IFA1$="B.MUENCHEN"THENFAS=70500 

150 IFA1l$="1.FC{ SPACE}KOELN"THENFAS=55098 
151 IFAL$="HAMBURGER{ SPACE}SV"THENFAS=56900 
152 IFA1$="B.M'GLADBACH"THENFAS=3000® 

153 IFAl$="E. FRANKFURT" THENFAS-56088 

154 IFAl$="W.BREMEN"THENFAS=35000 

155 IFAi$="1.FC{SPACE}K' LAUTERN"THENFAS=-3350 
® 

156 IFA1$="VFB{ SPACE}STUTTGART"THENFAS=65500 
157 PRINT" {RVSON SPACEYTASTE{ SPACE}FÜUER{SPAC 
EYSPIELBEGINN{ SPACE}DRUECKEN{ SPACE RVSOFFY“: 

















<185> 
<16> 
<74> 
<209> 


<201> 
<113> 
<239> 
arı9 
<134> 
<153> 


<149> 
<16> 
<81> 
<35> 
<138> 
<172> 
<195> 
<218> 
<252> 


<131> 
<83> 
<139 > 
<242> 
<208> 
<200> 
<249> 


<2332 


<71>2 
<49> 
<134> 
<897 
<1> 
<182> 
<107> 
<195> 
<230> 
<21> 
<29> 
246? 
<191> 


<46> 
<98> 


2377 


<31> 
<144> 
<88> 
<213> 
<114> 
<3> 
<172> 
<104> 
<243> 
<250> 
<32> 
<164> 
<7>2 
642 . 
<245> 
<1792 


<201> 
<148> 


43 


EEE PROGRAMME 


GETKEYA$ : 
158 GOSUB508: GRAPHIC® 
159 PRINT" { CLEAR} " 
160 CHAR, 20,5, "ENDERGEBNIS { SPACE} "+STR$ (GT) + 
"{ SPACE} : { SPACE} "+STR$ (KK) 
161 IFK IFKK<GTTHENH=H#+2: :ELSEIFKK=GTTHENH=H+1 
162 QM(8)=QM(8)+GT:TY=-9:YU=-0 
163 .IFGT>KKTHENTY=-100 :MO=MO+.5::ELSEIFGT<KKTH 
ENYU=100:MO=MO-.25 : 
164 K=-K+GT-KT+TY-YU 
18 ‚ IFGT>3THENMG=MG+1 

_ IFKK<=2THENMP=MP+1 
ve7. IFKK>=4THENMP=MP-1 
168 IFGT<=2THENMG=-MG-1 
169 GOSUB607 
178. GRAPHIC®: SCNCLR: :ZF=INT(RND(2) *FAS)+5000 
171 PRINT" { RUSON} BILANZ { SPACE}DES{ SPACE} LIGA 
SPIELS{ SPACE19 RVSOFF} " 
172 PRINT" { DOWN} ZUSCHAUER ( SPACEB) : 2,’ZE 
173 IFSP=1ORSP=30RSP=50RSP=7THENPRINT'" { DOWN} 
EINNAHME { SPACE9} :";ZF*25 
174 PRINT" (DOWN RUSON) ABGABEN { RVSOFF 
175 PRINT" ( DOWN) SPIELERGEHAELTER( SPACE): {SPA 
CE}440000" 
176 IFGT<KKTHENPAE=9:GOTO179 
177 IFSP=2ANDGT= >KKORSP=4ANDGT= >KKORSP=6ANDG 
T=>KKTHENPAE=27508 
178 IFSP=1ANDGT >KKORSP=3ANDGT>KKORSP=SANDGT> 
KKORSP=7ANDGT >KKTHENPAE=22200 
ri PRINT" { DOWN} PRAEMIEN{ SPACE9} : {SPACE} ";PA 


180 IFSP=10RSP=-30RSP=50RSP=7THENPRINT'" { DOWN} 

STADIONMIETE{ SPACE5} : {SPACE2}10000" 

181 PRINT" ( DOWN} MANAGERGEHALT ( SPACE4} : {SPACE 

2}35900" 

182 IFSP=10RSP=30RSP=50RSP=7THENK=K+ (ZF*25) - 

440000-PAE-10000-35009:60T0184 

183 K=K-440000-PAE-35008 

184 MAG=MAG+35900 : PRINT" { DOWN2}NEUER{ SPACE}K 

APITALSSTAND{ SPACE} VON{ SPACE} " ;M$; ": "PRINT" 

{DOWN} "TAB(13):K 

185 PRINT" { DOWN2} NEUER SPACE}KAPITALSSTAND(S 

PACE}VON{ SPACE} " ;N$; ":";MAG 

186 GOSUB607 

187 GRAPHICQ:SCNCLR 

188 PRINT"{DOWN SPACE}DIE{ SPACE}RESTLICHEN{S 

PACE}ERGEBNISSE: { DOWN} " 

189 X=-INT(RND(8) *5) :Y=INT(RND(®)*5) :Z=INT(RN 

D(8)*5) :C=INT(RND(2) *5) :WE=INT(RND (2) *5) 

198 ONFGOTO0191,202,212,222,230, 238,246 ,252 

191 QW=INT(RND(8)*5) :WE=INT(RND (8) *5) 

192 PRINTSS$; "{SPACE}-( SPACE} " ;DD$;TAB(29) :Q 

W; “_ » :WE 

193 IFQWWETHENB=B+2 : ELSELFOW>WETHENN=N+2 

194 QM(7)=QM(7)+NW:QM(2)-=NM(2)+WE: IFQW=WETHE 

NB=B+1 :N=N+1 

195 PRINTFF$; "{ SPACE) -{SPACE}" ;66$; TAB(29) ;X 

196 IFX<YTHENL=L+2: ELSELFX >YTHENV=V+2 

197 QM(3)=AM(3) +X:QM(4) =QM(A)+Y: IFX=-YTHENL=L 

+1:V=V+1 

198 PRINTHH$; " (SPACE) -{ SPACE)" ;IJJ$; TAB(29) ;Z 

;"-";C: IFZ>CTHENO=0+2 

199 IFZ<CTHENJ=J+2 

208 NM(5)=NM(5)+2:QM(6)=NM(6)+C: IFZ=CTHENO=O 

+1:J=-J+1 

201 GOTO254 

202 KT=INT(RND(9)*5) :Y=INT(RND(0) *5) 

a PRINTAAS$; "(SPACE}-( SPACE} " ;66$; TAB(29) ;K 
[3 " :Y 

294 IFKTS YTHENL=L+2; :ELSEIFY<KTTHENT=T+2 * 

205. QM(1)=NM(1)+KT:QM(4)=QM(4)+Y: IFKT=YTHENL 

-L+1:T=T+1 

‚206 PRINTFF$; "{SPACEI-{ SPACE)" ;HH$;TAB(29);X 

= El} ıZ 

207 IFX<ZTHENO=0+2: ELSEIFX>ZTHENV=-V+2 

ee :QM (5) =QM(5) +2: IFX-ZTHENO=O 

+ =V+ 
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<24> 
<171> 
<189> 


<187> 
<73> 
<71> 


<104> 


<36> 
<128> 
<54> 
<72> 
<155> 
<14> 
<169> 


<202> 
<255> 


<85> 
<192> 


<75> 
<68> 


<239> 
<185> 
<212> 
<37> 
<134> 
<70>: 
<37> 
<62> 
<139> 
<31> 
<71> 
<106> 
<16> 
<15> 
<94> 


<255> 
<111> 


<72> 


<76> 
<74> 


<246> 


<99> 
<79> 


<167> 
<37> 
153) 


<162> 


<160> 
<248> 
<139) 


<1472 


<56> 


209 PRINTDD$; " {SPACE} -{SPACE}" ;3J$: TAB(29) ;W 
E; "-";C: IFWESCTHENJ=J+2:: ELSELFWE >CTHENB=B+2 
218 QM(2)=QM(2) +WE: :QM (6) =QM(6) +C: IFWE=CTHENB 
=B+1:J=J+1 

211 GOTO255 

212 KT=INT(RND(8)*5) :QW=INT(RND(®)*5) 

213 PRINTAA$; "{ SPACE} -{ SPACE} " ;5S$; TAB(29) ;K 
T; _" :QWw 

214 IFKT<QWTHENN=N+2 : ELSEIFKT>QWTHENT=T+2 
215 QM(T)=QM(1)+KT:QM(7)=QM(7) +QW: IFKT=QWTHE 
NN=N+1:T=T+1 








216 PRINTFF$; "{SPACE}-{ SPACE)" ;JJ$; TAB(29); = 


RN -";C 


317 Are, :ELSEIFX>CTHENV=V+2 

218 QM(3)=QM(3)+X: AMLEI=NM(6)+C: IFX=CTHENJ=J 
+1:V=V+1 

219 PRINTGG$; "{ SPACE}-1SPACE}" ;HH$;TAB(29) ;Y 
;"-"; 2: IFY<ZTHENO=0+2 :ELSEIFY>ZTHENL=L+2 

228 QM(4)=QM(4) +Y:QM(5)=QM(5) +2: IFY=ZTHENO=O 
+1:L=L+1 

221 GOTO256 

222 KT=-INT(RND(9)*5) :WE=INT(RND(®)*5) 

223 PRINTAA$; "{SPACE}-{ SPACE} " ;DD$;TAB(29) ;K 
T; "=" ;WE: IFKT<WETHENB=B+2 : ELSEIFKT )WETHENT=T 
+2 

224 QM(1)=QM(1)+KT:QM(2)=NM(2)+WE: IFKT=-WETHE 


. NB=B+1: T=T+1 
‘225 PRINTSS$; "{ SPACE}-( SPACE} " ;HH$; TAB(29);Q 


W;"-";2: IFQW<ZTHENO=0+2: ELSE ELSEIFQWIZTHENN=N+2 
226 OM(7)=QM(7) +QW: QM(5)=QM(5) +2: IFOQW=ZTHENN 
=N+1:0=0+1 ; 

227 PRINTGG$; "{SPACE}-(SPACE}";JI$:;TAB(29) ;Y 
;"-";C:IFY<CTHENJ=J+2:ELSEIFY>CTHENL=L+2 

228 QM(4)=QM(4)+Y:QM(6)=QM(6)+C: IFY=CTHENJ=J 
+1:L=L+1 

229 GOTO257 

238 KT=INT(RND(0)*5) :X=INT(RND(®) *5) 

231 PRINTAA$; "{ SPACE}-{SPACE}" ;FF$;TAB(30) ;K 
T;"-";X: IFKT<XTHENV=V+2 :ELSEIFKT>XTHENT=T+2 
232 QM(1)=QM(1)+KT:QM(3)=QM(3)+X: IFKT=XTHENT 
=T+1:V=V+1 

233 PRINTSS$ ; " {SPACE} - -{SPACE}“" ;JJ$; TAB(30) ;Q 
W;"-";C: IFQW<CTHENJ=J+2: : ELSEIFQW>CTHENN=N+2 
234 OM(7)=QM(7)+QW: QM (6) =NM(6) +C: IFQW=CTHENJ 
=J+1:N=N+1 

235 PRINTDD$; " {SPACE} -{ SPACE} " ;HH$;TAB(30) ;W 
E;"-";2: IFWE<ZTHENO=0+2 : ELSEIFWE>ZTHENB=B+2 
236 QM(2)=NM(2) +WE:QM(5)=-NM(5) +2: IFWE=-ZTHENO 
=0+1:B=B+1 

237 GOTO258 

238 KT=INT(RND(8)*5) :C=INT(RND(9) *5) F 

239 PRINTAA$; "{ SPACE} -{SPACE}" ;JJ$; TAB(29) ;K 
T;"-";C: IFKT<CTHENJ=J+2 : ELSEIFKT>CTHENT=T+2 
248 QML1)=QM(1)+KT:QM(6) -NM(6) +C: IFKT=CTHENJ 
=J+1:T=-T+1 

241 PRINTSS$; "(SPACE}-{SPACE}" ;FF$;TAB(29);Q 
W;"-";X: IFQW<XTHENV=V+2: : ELSEIFQW>XTHENN=N+2 
242 QM(7)=QM(7)+QW: AML3I-AM(I)+X: IFQW=YTHENV 
=V+1:N=N+1 

243 PRINTDD$;"{ SPACE} -(SPACE}" ;6G$;TAB(29) ;W 
E;"-";Y: IFWE<YTHENL=L+2: : ELSEIFWE>YTHENB=B+2 
244 OM(2)=QM(2) +WE: QM(4)=QM(4) +Y: IFWE=YTHENL 
=L+1:B=B+1_ 

245 GOTO259 

246 KT=INT(RND(8)*5) :Z=INT(RND(0)*5) 

247 PRINTAA$; "{ SPACE} -{ SPACE)" ;HH$;TAB(29) ;K 
T;"-";Z: IFKT<ZTHENO=0+2 : ELSEIFKT>ZTHENT=-T+2 
248 QM(1)=QM(1)+KT:QM(5)=QM(5)+2: IFKT=ZTHENO 
=0+1:T=T+1 

249 PRINTSS$ ; "{ SPACE) - {SPACE} " ;66G$; TAB(29);Q 


W.;"—";Y: IFQWCYTHENL=L+2: : ELSEIFQW>YTHENN=N+2 

258 PRINTDD$; "{SPACE}-{ SPACE} ;FF$; TAB(29) ;W 
Be: IFWE< XTHENV=V+2: : ELSEIFWE>XTHENB=B+2: 
F=8 


.251 QM(7)=QAM(7)+QW: :QM(A)=QM(A)+Y: IFQW=YTHENL . 


=L+1:N=N+1 


252 QM(2)=QM(2) +WE:AM(3)=NM(3)+X: ZPHESRTIERN 
=V+1:B=B+1 


<118> 
<45> 
2513 
<33> 


<211> 
<12> 


<38> 


<98> 
<139> 


<193> 
<6> 
<73> 
<65> 
<113> 
<96> 
<147> 
<66> 
<67> 
<161> 
<208> 
<773 
<167> 
<70> 
<165> 
<174> 
<103> 
<10>3 
<ı191> 
<89> 
<137> 
<218> 
<139> 
<76> 
<155> 
<63> 
<127> 
<101> 
<211> 
<237> 
<107> 


<246> 


<82> 
<8> 
<ı>. 
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a An ee u u | Ka A a A 


253 F=9:60T0268 

254 F=2:60T0268 

255 F=3:60T0260 

256 F=4:G0T0260 

257 F=5:G0T026®8 

258 F=6:60T0269 

259 F=7:G60T0260 

260 GOSUB607:SCNCLR 
261. 
CE)" ;SP;" .SPIELTAG{ SPACE DOWN2}'" :WEX-8::WX=® 
262 PRINT"PL. {SPACEYTEAM"TAB (22) "GESCHOSS. TE 


: AB(32) "PUNKTE" 


263 PRINTTAB (24) "TORE" 

264 QF(1)-T:QF(2)=B:QF(I)=-V: OFLA)=L: QF(5)=0: 
DOF(6)=J:QF(7)=N:QF(B)=H:T$(1)=AAS:TS(2)=DD$ 
265 T$(3)=FF$:T$(4)-66$:T$(5)=HH$:T$(6)=-JJ$: 
T$(7)=S3$:T$ (8) =" { RUSON} "+M$+" LRUSOFE)" 

266 FORI-1T08:DR--99999 : FORUY=1TO8 

267 IFQF(UY)<=DRTHEN269 

268 DR=QF(UY) : IO=-UY 

269 NEXT 

279 PT(I)=IO:QFLIO)=-QF(IO) :NEXT 

271 FORI=1TO8 

272 IFQF(I)=®THENWEX=WEX-1:WX=WX+1:WEX(WX)=Q 
FL) :WEX$S(WX)=T$ CI) :WTX(WX)=QMCT) 

273 IFQF(I)=OTHENNEXT : ELSENEXT 

274 FORI=1TOWEX:UK=PT (I) :PRINTI;T$ (UK) ;TAB(2 
4) :QM(UK) ;TAR(32); 

275 PRINT-OF (UK) : :IFI= =1THENPK$=T$ (UK) 

276 IFI=8THENKC$=T$ (UK) 

277 NEXT: IFWX=0THEN279 : ELSEFORI=1TOWX : PRINTS 
-WX+I:WEX$ (I) ;TAB(24) ;WTX(I); TAB(32) ;WEX(I) 
278. IFI=WXTHENKC$=WEX$ (I) :NEXT:ELSENEXT 

279 IFF=9THEN280 : ELSEGOSUB6097 : GOTO626 


280 IFPK$=T$ (8)THENSI$="{FLASHON SPACE}DU{SP 


ACE} BIST { SPACE} DEUTSCHER (SPACE}MEISTER( SPACE 
'}GEWORDEN ( SPACE} ! { FLASHOFF} " :PK$=M$ 

281 GOSUB607 :GOSUB622:SCNCLR:GRAPHIC1,1: REST 
ORE282: FORI=1T014: READFG, TH,RA: CIRCLE, FG, TH, 
RA:NEXT 

282 DATA160,90,80,160,90,50,97,75,10,120,140 
,10,204,137,10,214,54,10,140,28,10 

283 DATA160,90,85.120,140,5,204,137.,5,214,54 


53 

584 DATA149,28,5,97.75,5,160,90,45 

285 PAINT,120,140:PAINT,204,137:PAINT,140, 28 
PAINT, 97,75 

286 PAINT,214, 54: CHAR, 16,9, "DEUTSCHER" :CHAR, 
17,12, "MEISTER" 

287 CHAR, 14,23, PK$:GOSUB547 

288 GOSUB607:GRAPHICO 

289 IFKC$=T$ (8) THENGH=®:GOT0601 

298 GOTO370 

291 PRINT" {CLEAR} VIERTELFINALE{ SPACE) AM{ SPAC 
EI" ;TAG;" N; VC;"."; JA: FORI=1TO40 : PRINT" (CTI" 
:NEXT 

292 PRINT" { DOWN}GEGNER: {SPACE} " ;AA$; TAB(25) ; 

"(SPACEYBL{SPACE RVSON SPACE)PK{SPACE RVSOFF 
}"; PRINT" {. DOWN) ZUHAUSE { SPACE RVSON) AUSWAERTS 
4 RVSOFF} " :A1$=AA$ : GOSUBB49 

293 GT=INT(RND(8) *MO) :CKT=INTLRND(®) *YJ) ;KK= 
CKT 

294 IFAA$="B.MUENCHEN"THENGOSUB833 

295 IFAA$="1.FC4 SPACE}KOELN"THENGOSUB834 

296 GOSUB5@8:GRAPHICO 

297 GHJ$=" {SPACE} IM{ SPACE} VIERTELFINALE(SPAC 
EYAUSGESCHIEDEN" : PRINT" { CLEAR} " 

298 IFGT<KKTHENCHAR,@,5,"AUSGESCHIEDEN{ SPACE 
ENDERGEBNIS: "+STR$ (GT) +":"+STR$ (KK) 

299 IFGT<KKTHENLKJ=2: CER=1:G0SUB607 :GOSUB608 
:60T077 

300 'IFGT>KKTHENCHAR, 0,5, "WEITERGEKOMMEN { SPAC 
E6} ENDERGEBNIS: "+STR$ (GT) +": "+STR$ (KK) :GOSUB 

607 

301 IFGT>KKTHENLKJ=2:GOSUB608 :GOT0304 

302 CHAR,0,5. "ELFMETERSCHIESSEN ( SPACES}ERGEB 

NIS: "+STR$ (GT) +": "+STR$ (KK) : TAG=TAG+3 

303 GOSUB607 :GOSUB79@ :GOTO298 











C16-SA 4/88 


PRINT"{ DOWN SPACE} BUNDESLIGA-TABELLE{SPA_ 


<113> 


PROGRAMME EEE 


304 K=K+250088:5CNCLR: PRINT" { DOWN}HIER (SPACE 
}DIE{ SPACE) ERGEBNISSE SPACE} DER{ SPACE} ANDERE 
N{ SPACE}SPIELE{ DOWN2} " 

305 X=INT(RND(®)*5) :Y=INT(RND(0)*5) 

306 IFX<YTHENCW$=DD$ : ELSEIFX>YTHENCWS=-S5$ 
307 IFX=YTHEN305 

308 PRINTSS$; "{SPACE}-1SPACEY";DD$;TAB(32); ;x 
; _." ;YX 

389 Z=INT(RND(0)*5): :C=INT(RND (8) *5) 

316 IFZ<CTHENCQ$=GG$ : ELSEIFZ>CTHENCN$=-FF$ 


311 IFZ-CTHEN309 




































<13? 
<249? 
<253? 
<2> 
<6> 
<10> 
<14> 
<252> 


57? 


<233> 
<180> 





„'— “, aß 

313 QW=INT(RND(®) *5) :WE=INT(RND(0)*5) 

314 IFQW<WETHENCP$=JJ$: :ELSEIFQW>WETHENCP$=HH 

$ 

315 IFQW=WETHEN313 

mE ERINTHHSE"LSPACHIS SPACE": JJ$; TAB(32);Q 
317 GOSUB607:SCNCLR 

318 TAG=TAG+7 : IFTAG >28THENTAG=1; VC=VC+1. 

319 IFVC=12THENJA=JA+1:VC=1 

320 PRINT" ( CLEAR}HALBFINALE ( SPACE} AM{ SPACE) " 
a "."VC;"."; JA: FORI=1T040:: PRINT" CT"; :N 
XT 

321 PRINT" ( DOWN) GEGNER{ SPACE) " ; CW$ ;TAB(25) ;" 
{SPACE}BL{ SPACE RVSON SPACE}PK{ SPACE RVSOFF} 
* "PRINT" { DOWN} ZUHAUSE { SPACE ‚RVSON} AUSWAERTS{ 
RUSOFF} " :A1$=CW$ 

322 GOSUB849 

323 LFCW$="HAMBURGER{ SPACE} SV"THENFAS=56009: 

GOSUBB35 

324 IFCW$="1.FC{SPACEYKOELN"THENFAS=55008:60 

SUB834 

325 IFCW$="1.FC{SPACE}K'LAUTERN"THENFAS-3350 

0:G0SUB839 

326 IFCW$="VFB{ SPACE}STUTTGART"THENFAS=6550® 
:GOSUB849 

327 GT=INT(RND(®) *MO) :HKT=INTLRND (0) *YJ+1) :K 

K=HKT :GOSUBS08 :G6RAPHIC® 

328 GHJ$="( SPACE) IM{ SPACEYHALBFINALE(SPACE}A 

USGESCHIEDEN" : PRINT" { CLEAR} " 

329 IFGT<KKTHENCHAR,®,5, "AUSGESCHIEDEN{ SPACE 
ZYENDERGEBNIS: "+STR$ (GT) +":"+STR$ (KK) 
ee :G0SUB697 :LKJ=2:G0OSUB608 
331 IFGTSKKTHENCHAR, 0,5, "FINALEINZUG ( SPACE9) 
ENDERGEBNIS: "+STR$ (GT)+":"+STR$ (KK) 

332 IFGT>KKTHENK=K+5000099 :MO=-MO+1 :G0SUB697: 
GOSUB688:: 6GOTO335 

333 CHAR,®,5, "ELFMETERSCHIESSEN{ SPACE7}ERGEN 
IS:"+STR$ (GT) +" :"+STR$ (KK) 

334 GOSUB607 :GOSUB799 :G0T0329 

335 GOSUB607 :SCNCLR: PRINT"{ DOWN2 SPACE9YHIER 
{ SPACE} DAS { SPACE} ERGEBNISS{ SPACE2}" 

"336 PRINT" { DOWN DOWN SPACE9}DES{ SPACE) ANDEREN{ SPA 
‚CEYSPIELS{ SPACE} : { DOWNZ}" 

337 Z=INT(RND(9).*6) :C=-INT(RND(®)*6) 

338 IFZ<CTHENJIK$-CP$ : ELSEIFZ>CTHENJKS=CQ$ 


<412 
242? 
<58> 
<43> 
<144> 
<174> 
<129> 


<231> 
<121> 


<102> 
<58> 
<234> 








<239> 
<150> 
<23> 


<126> 


<129> 





<55> 





<226> 
<253? 


<154> 


<39> 
<21> 
<44> 
<1227> 
<1197 





<195> 











<147> | 339 IFZ=CTHEN337 
340 PRINTCQ$; "(SPACE}-1SPACE)" ;CP$; TAB(32); z 

71313 222 

<91> | 341 GOSUB607 

<ao> 1342 TAG-TAG+7: IFTAG>28THENTAG=-TAG-28:VC=VC+1 

<54> | 343 PRINT" (CLEAR RVSON FLASHON SPACE}FINALE{ 
SPACE ELASHOFF RVSOFF ISOFF SPACE) AM{ SPACE} " ;TAG;" 

<&197: |": "3 VC;".";JA: FORI=1T040:PRINT"{CT}";:NEXT. .. 
344 PRINT" { DOWN} GEGNER SPACE) "; JK$: PRINT" {DO 

<4> WN}ZUHAUSE{ SPACE RVSON}AUSWAERTS ( RVSOFF}" :A1 
$=JK$ : GOSUB849 

<162: ae IFJK$="B.M' GLADBACH" THENFAS=30000 :GOSUB8 
346 IFJK$="HAMBURGER{ SPACE}SV"THENFAS=-56090: 

<207> | GOSUBB3IS 

<227: u IFJK$="E. FRANKFURT" THENFAS=56000 :GOSUB83 

<94> |348 IFJIK$="W.BREMEN"THENFAS=35900 : GOSUB838 

<114> 1349 er FC{ SPACE}K' LAUTERN"THENFAS=335® 


312 PRINTFF$; "(SPACE SPACE)" ;66$; TAB(32) ;2 ” 


<1247 
<al> 
<1087 
<86> 


<71> 
<17> 
<2027 


<38> 
2453 


<217> 
<72 
$103> 


.<110) 


533 
<119? 
<49> 


<877 


<162> 
<192> 


<166> 
<87> 
<196> 
<11> 
<55> 
<36> 
<35> 
<160> 
<12> 
<158> 


<219> 
<80> 


<2> 
<91> 
<77> 
<250> 
<712 
<169> 


<187> 
<92> 


<242> 


<177> 
<0> 
<167> 


<111> 
<16> 


45 


BEE PROGRAMME 


0:60SUB839 

350 GT=INT(RND(8)*MO) :C=-INT(RND(®)*YJ+2) 

351 KK=C:GOSUB508 : GRAPHICQ : PRINT" { CLEAR} " 

352 IFGT-KKTHENCHAR, @,5, "ELFMETERSCHIESSEN{ S 
PACE6} ERGEBNIS: "+STR$ (GT) +": "+STR$ (KK) 

353 IFGT=KKTHENGOSUB697 : GOSUB799 :G0T0354 

354 IFGT<KKTHENK=K+308020 :MO=MO+1 :G0T0367 
355 K=K+900000 :MO=MO+2: CHAR, 0,5, "POKALSIEGER 

LERACESYENDERGEBNIS: "+STR$ (GT) +" (SPACE) : "+ST 
$ (KK) 

FE GER A:CHAR. 0,7, "IHR SPACE)KAPITAL( SPACE) 
STt$S ACE}UM{ SPACE} 1{ SPACE}MIO. { SPACE} DM{ SP. 
CEYGESTIEGEN." m 
357 CHAR, 0,8, "DIE{ SPACE}MORAL{ SPACE}HAT{ SPAC 
EYSICHt SPACEYUM{ SPACE} 3{ SPACE} GESTEIGERT" :GH 
J$="{SPACE FLASHON}POKALSIEGER{ FLASHOFF SPAC 

EN 

358 K=K+1000900 :MO=MO+3:GOSUB607 

359 GOSUB608:GRAPHIC1,1:DRAW,100,160T0202,16 
OT0192,140T0167,148T0167,126T0176 ,126 

369 DRAW1T0176,120T0125,120T0125,127T0135,12 
7T0135,1498T0118, 148T0108,160 

361 DRAW,110,120T098,10T0202,10T0198,120T011 
®,120:DRAW, 100, 20T0201,20 

362 DRAW,102,40T0199,490:DRAW,110,90T0119,60T 
01398,75T0119,90:DRAW, 148, 90T0149,60T0160,60 
363 DRAW,140,70T0150,79 

364 DRAW,178,60T0190,67T0170,75T0198,83T0179 
,908T0170,68:FORI=12PTO180STEP38 - 3 

365 CIRCLE,I,30,7.5:CIRCLE,I,30,2.5:PAINT1,I 
,‚30:NEXT:JF=® - 

366 CHAR1,12,21,M$:GOSUB607 :GRAPHIC®:GOTO77 
367 CHAR,®,5,"POKALVIZESIEGER{SPACE6}ENDERGE 
BNIS:"+STR$ (GT)+":"+STR$ (KK) 

368 GHJ$="{ SPACE RUSON}POKALVIZESIEGER{RVSOF 
F vu 

369 CER=3:G0SUB607 :GOSUB608:: LKJ=2:G0OSUB697:G 
0T077 

378 SCNCLR:PRINT" {DOWN SPACE}DEINE{ SPACE}ERF 
OLGE{ SPACE} :" - 

371 SC=(MO*3)+(K/18008) +CER+TER 

372 PRINT"{DOWN2 SPACE}NAME{ SPACE} : {SPACE} "; 
N$; TAB (24) ; "PUNKTE{ SPACE} : "; INT(SC) 

373 PRINT"{DOWN2 SPACE} 1M{ SPACE}POKAL{ SPACE} 
HAST{ SPACE}DU{ SPACE}ERREICHT{ SPACE, :" 

374 PRINT" { DOWN} " ;GHJ$ : PRINT 

375 PRINT" {DOWN2 SPACE} DEINE{SPACE}MEISTERSC 
HAFTSPUNKTE{ SPACE} :";H 

376 PRINT" { DOWN)" ;SI$ 

377 PRINT" {DOWN SPACEYWOLLEN{ SPACE}SIE{ SPACE 
}DEN { SPACE} VEREIN{ SPACE} WECHSELN { SPACE} J-N{S 
PACE}“ 

378 GETKEYA$: IFA$="J"THEN29:ELSEIFA$="N"THEN 
379 :ELSE378 

379 IFK<-4500000THENGH=1 :G0T0601 

380 IFKC$=-T$ (8) THEN2® : ELSEMO=4 :MP=4 :MG=4:MG= 
4:SP=9:GH=® 

381 CER=8:CHJ$="{ SPACE} IN{ SPACE}DER{ SPACE}. 
RUNDE ( SPACE} AUSGESCHIEDEN { SPACE} ! !":X=®:Y=0: 
FORI=1T016:BC(I)=9:NEXT 

382 SI$="{SPACE}DU{ SPACE}HAST{SPACE}DIE{SPAC 
E)MEISTERSCHAFT { SPACE} VERFEHLT{ SPACE} ! " :LKJ= 
1:FORI=1T08:QM(I)=®:NEXT 

383 M=1:F=1:T=8:N=9:B=0:V=8:L=9:0=-8:J=0:H=B: 
TER=H/2:G0T077 

384 DATAPFAFF,33,NACHTWEIH, 30, PFLUEGLER, 27,E 
DER, 31, AUGENTHALER, 29, BREHME, 26 

385 DATAFLICK, 22,MATTHAEUS, 26,J.WEGMANN, 23,M 
„RUMMENIGGE,23,KOEGL, 21 

386 DATAAUMANNN, 23, WINKLHOFER, 25 ,WOHLFARTH, 2 
4, TSCHISKALE, 25, BAYERSCHMIDT, 20 

387 DATALUNDE, 23, DORFNER, 22 
- 388 DATAILLGNER,2®,PRESTIN,30,M.WOLLITZ,26,K 
OHLER, 21, STEINER, 30 OLSEN, 37 

389 DATAGOERTZ,27,ENGELS,26,POULSEN,20,T.ALL 
OFS,27,LEHNHOFF, 24, KARGUS,, 34 

390 DATAHOENERBACH, 25, GRIEHSBACH, 22, GIELCHEN 
‚22,HAESSLER, 21, JANSSEN, 20, WOODCOCK 
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<198> 
<204> 
<140> 
<162> 


<123> 
<212> 


<26> 


<58> 


<148> 
1343 


<31> 
<190> 
<194> 


<5> 
<72> 


<20> 


<162> 
<134> 


- <£209>. 


<64> 
<175> 


<173> 
<188> 


<184> 


<142> 
%67> 


<56> 
<73> 
<204> 


<72> 
<52> 


<82> 


<209> 


<63> 
<4> 
<164> 
<142> 


<124> 
<183> 


<733 
<2> 
933 





391 DATA31. 

392 DATAGOLZ,18,KALTZ, 34, BEIERSDORFER, 24, JAK 
0BS,34,PLESSERS, 28 

393 DATAVON HEESEN, 26,KROTH,28, BEIN, 26,KASTL 
‚22,0KONSKI,29,JUSUFI,25 

394 DATA----—- .‚8,HINZ,23,SCHMOELLER, 21,CALIG 
IURI,23,HOMP, 23, GRUENDEL, 39 

395 DATALABBADIA, 21 

396 DATAKAMPS, 23, WINKHOLD, 25, FRONTZECK,23,KR 
AUSS,3®, DREHSEN, 22,HERLOVSEN, 27 

397 DATABRUNS, 32, RAHN, 25, THIELE, 25, HOCHSTAET 
TER, 23, BAKALORZ, 23,R. STEINER, 22 

398 DATAKRISP,21,BRANDTS,25,CRIENS, 26 ,HERBST 
‚24,WILLAARTS, 26, BUDDE, 24 

399 DATAGUNDELACH, 23,KRAAZ,23,ROTH, 23, KOERBE 
L,32,SCHLINDWEIN, 26 : 

400 DATASIEVERS, 26,KITZMANN,23,U.MUELLER, 23, 
TUROWSKI ‚26, DETARI,, 24, SCHULZ, 26 

4@1 DATAERNST,19,SMOLAREK,3@,HEITKAMP, 24, FRI 
2,22,BALZIS,22,BINZ, 21 

482 DATAMOELLER,19 

403 DATABURDENSKI, 36,SCHAAF,26,OTTEN, 32 ,KUTZ 
OP,32,BRATSETH, 26 ; 

404 DATAMOEHLMANN, 32, VOTAVA,31,BOROWKA,25,RI 
EDLE, 21 ,MEIER, 29 ,ORDENEWITZ,, 22 . 

405 DATARECK, 22, RULAENDER, 22,SAUER, 23, NEUBAR 
TH, 25, BURGSMUELLER, 37 ,WOLTER 

406 DATA23,HERMANN, 26 


407 DATAEHRMANN, 28, DUSEK,28,WOLF,29,GROH,31, 


MOSER, 21,H00S, 22, SPIELBERGER 

408 DATA26, HARTMANN, 26,KOHR,25,WUTTKE, 25,ALL 
IEVI,23,SERR, 25, FRIEDMANN, 24 

409 DATANUSHOEHR, 24,SCHUPP, 21, GUDMUNDSSON, 25 
‚ROOS,21 : 

410 DATAIMMEL,26,SCHAEFER, 25,BUCHWALD,26,BEI 
ERLORZER, 30 ,ZIETSCH, 24 

411 DATASCHROEDER, 27, ALLGOEWER, 38, GAUDINO, 21 
„KLINSMANN, 23, SIGURVINSSON, 32 

412 DATAF.WALTER,27,TRAUTNER, 20,STREHMEL,19, 
J.HARTMANN, 24, BUNK, 24 ,MERKLE, 25 

413 DATAPERFETTO,22,SCHUETTERLE, 21° 

414 RESTORE415:FORI=1T018:READMOD$ (I) :NEXT 
415 DATASW- ESSEN,RW ESSEN,A.AACHEN,SSV ULM,1 
868 MUENCHEN,SC FREIBURG 

A416 DATAH.KASSEL,HANNOVER 96,KARLSRUHER SC,B 
AY.LEVERKUSEN 

417 RESTORE418:FORI=1T08:READMN$ (I) :NEXT 

418 DATAB.MUENCHEN,1.FC KOELN,HAMBURGER SV,B 
.M' GLADBACH 

419 DATAE.FRANKFURT,W.BREMEN,1.FC K'LAUTERN, 
VFB STUTTGART 

428 RESTORE421:FORI=1T019:READZUT$ (I) :NEXT 
421 DATATOTAL AUSSER FORM,NICHT ZU GEBRAUCHE 
N, LUSTLOS,, BESTAENDIG ‚GUT, EXCELLENT , SUPER 

422 DATASPITZE, AUSNAHEMEKLASSE ‚WELTKLASSE 
423 RESTORE424 :FORI=1T08:READSF$ (I) :NEXT 

424 DATAFC BAYERN MUENCHEN,1.FC KOELN 21/02, 
HAMBURGER SV = 

A253 DATAVFL BORUSSIA MOENCHENGLADBACH, EINTRA 
CHT FRANKFURT,SV WERDER BREMEN 

426 DATA1.FC KAISERSLAUTERN,VFB STUTTGART 
427 RESTORE427:FORI=1T016:READSW$(I),PO$(I), 
RT(I),TR(I),AT(I) :NEXT:FORI=1T016 

428 RT(I)=RT(I)*1000:NEXT:RETURN 

429 DATAW.JUNGHANS,SCHALKE 04,500,4,27,P.MAC 
AK,SCHALKE 04,350,2.5,30 

430 DATASCHATZSCHNEIDER, FORTUNA KOELN, 320,3, 
20,A.MUELLER,VFB STUTTGART,480,4,24 

431 DATAP.PASIC,VFB STUTTGART, 750,4,27,R.BOR 
CHERS,SVW MANNHEIM, 675,2.5,29 . 

432 DATAA .HAHN, BOR.DORTMUND, 200,3,28,E.KESER 
, BOR. DORTMUND, 758,4,26 - 

433 DATAW.HARTWIG,FC HOMBURG,400,2.5,32,M.HE 
IDENRICH, HANNOVER 96,450,3,20 

434 DATAK.THEISS,E. FRANKFURT, 700,4,24,D.MITC 
HELL,E. FRANKFURT, 600,4,25 

435 DATAK-H.RUMMENIGGE, INTER MAILAND, 2500, 2. 
5.31,K.0ZAKI,A.BIELEFELD,400,4,27 


<4> 
<142> 
<43> 


<129> 
<217> 


<25> 
2573 
<32> 
<76> 
<252> 


£79> 
<81> 


"<206> 


<200> 


<235> 
<176> 


<194> 
<48> 

<180> 
<167> 
<65> 

<214> 
<199> 
<179> 
<190> 


<36> 
$235> 


<87> 


<129> 
<223> 


<141> 
<226> 
<192> 
%65> 


<144> 
<82> 


<124> 
<128> 


<84> 

<£217> 
<120> 
<133> 
<45> 

<204> 
<128> 


Ci16-SA 4/88 


436 DATAJ.WELP,RW ESSEN, 250,4,27,H-J.KOITKA, 
WATTENSCHEID, 275,2,35 d 

437 OP=OP+1 

438 PRINT" {CLEAR} TRANSFERLISTE{SPACE}NR.";OP 
439 PRINT"SPIELER" ; TAB(17) ;"LETZTER{SPACE)}VE 
REIN" :FORI=1T048:PRINT"({SE}"; :NEXT 

440 FORI=1T016:PRINTI;SW$(I);TAB(19);PO$(T): 
NEXT 

441 PRINT"{SPACE RVSON}17{RVSOFF SPACEYKEIN{ 
SPACE}EINKAUF" 

442 PRINT" { DOWN} UEBER { SPACE}YWELCHEN{ SPACE}SP 
TELER{ SPACEYWOLLEN { SPACE} STE ( SPACE}YMEHR" : INP 
UT"ERFAHREN ( SPACE} -NUMMER ( SPACE} " ;E 

443° IFE<=®0RE>16THEN76 

444 PRINT" { CLEARYSPIELER{ SPACE} " ;E:FORPL=1TO 
48:PRINT"{5C}"; :NEXT 

445 PRINT" ( DOWN} NAME"; TAB(9) ;": {SPACE} " ;SW$ ( 
De 
";TAB(9); 

3 A 
;RT(E) s 

447 PRINT" { DOWN}WOLLEN{ SPACE} SIE{ SPACE} IHN{S 
PACE}KAUFEN { SPACE} J/N" :GETKEYA$ 

448 IFA$="J"THENMDE=MDE+1 :GOT0450 :ELSEIFA$=" 
N"THEN438 : 

449 GOT0447 

450 PRINT" { CLEAR}SPIELER" ;TAB(25) ; "ALTER";TA 
B(33) ; "MORAL" 

451 FORI=1T040:PRINT"{SC}" ; :NEXT 

452 FORI=1T018:PRINTI;NQ$(I);TAB(26);AL(I);T 
AB(34) ;MO(I) :NEXT 

453 PRINT" { DOWN} WELCHER {SPACE} IHRER{ SPACE}SP 
IELER{ SPACE} SOLL { SPACE} DAFUER { SPACE}GEHEN" : I 
NPUT"NUMMER" ; I: IFI>18THEN450 

454 SR=INT(RND(®)*10) : IFSR=-0THEN454 

455 NW$=SW$ (E) :AC=AT(E) :MB=TR(E) 

456 SW$ (E)=DN$ (MDE) :AT(E)=DN(MDE) :TR(E)=4:PO 
$(E)=MOD$ (SR) :RT(E)=AL(TI) *40000 

457 NO$(I)=NW$:AL(I)=AC:MO(I)=MB:BC(T)=® 

458 DTV=INT(AL(I)*35000*(AL(I)/9)/2000) 

459 K=K-RT(E)+DTV ; 

460 PRINT" {CLEAR}DAS{ SPACE}NEUE{ SPACE} AUFGEB 
OB: . 

461 PRINT"SPIELER";TAB(25) ; "ALTER"; TAB(33) ;" 
MORAL" 

462 FORI=1T048: PRINT" {SC}" ; :NEXT x 
463 FORI=1T018: IFI=12THENPRINT" { RUSON}ERSATZ 
TORWART : { RVSOFF) " »ELSEIFI=13THENPRINT" { RVSON 
}ERSATZSPIELER: { RVSOFF}Y“ 

464 PRINTNQ$ (I) ;TAB(26) ;AL(I);TAB(34);MO(T): 
NEXT 

465 GOSUB607 : RETURN : 2 
466 COLOR®,2,7:COLOR4,2,7:COLOR1,15,4:GRAPHI 
Gh 1 

467 DRAW, 260 ,30T0260, 22T0264,25T0260,25:DRAW 
‚69.30T060 ,22T064,25T06®, 25 

468 DRAW,60,30T0260,30T0300,150T020,150T060, 
30 « 

469 DRAW,110,30T090,80T0220,80T0200,30:DRAW, 
125,30T0115,50T0195,50T0185,30 

470 FORI=1TO2:DRAW,130+1,31-IT0130+1,10-ITO1 
80+1,10-IT0180+1,31-I:NEXT 

471 DRAW,130,30T0143,25T0169,25T0189,30:DRAW 
‚143,25T0132,10:DRAW,168,25T0179,1® 

472 DRAW,50,110T060,90T072,90T070,93T063,93T 
061 ,97T065,,97T063, 100T059,10® 

473 DRAW,59,100T055,110T050,11® 

474 DRAW,72,110T077,100T080,100T077,107T083, 
197T086 ,100T089,100T084,110T072,110 

475 DRAW. 98,110T0100,107T0105,107T0107,105T0 
120,105T0103,100T0110,100 

476 DRAW,119,100T0108,102T0105,102T0103,103T 
0109,104T0106,110T098, 110 

477 DRAW,118,110T0120,107T0125,197T0127,105T 
0128,105T0123,100T0130,108 ; 
478 DRAW,130,100T0128,102T0125,102T0123,103T 
0129, 104T0126,118T0118,110 

479 DRAW,139,110T0144,93T0147,93T0145,102T01 
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PROGRAMME EEE 


54,102T0149,110T0139,11® 
















































<54> | A80 DRAW,142,107T0144,104T0149,104T0148,107T 
<218> | 0142,107 
<239> | A81 DRAW, 161,110T0165,100T0175,.100T0169,110T 
0161,11 
<8> 482 DRAW, 172,104T0172,.110T0170,110T0170,107 
483 DRAW. 165,107T0167,101T0171.101T0168,107T 
<203> | 0165,107 
484 DRAW,180,110T0185,95T0187,95T0183,110T01 
<71> | 80,110 
485 DRAW, 194,110T0199,95T0201,95T0197,110T01 
94,110 
<236> | A86 DRAW.220,104T0223,101T0230,101T0227,104T 
<129> | 0220,104 
487 DRAW,60,140T067.118T072,130T082,120T078," 
65> | 148T075,140T079,126T071,133T067,126 
488 DRAW,67,126T064,140T060,148 
489 DRAW,91.140T095,130T0105,130T099,140T091 
<67> | ‚140 . 
490 DRAW,102,134T0102,140T0100,140T0100,137 
<145> | 491 DRAW, 95,137T097,131T0101,131T098,137T095 
‚137 
<224> | 492 DRAW,111,140T0113,130T0115,130T0114,132T 
0121,132T0119,140T0116,140T0118,134 
<76> | 493 DRAW,118,134T0115,134T0114,140T0111,140 
<43> | 494 DRAW, 130,137T0132,131T0136,131T0133,137T 
- | 013,137 
<76> | 495 DRAW, 137,134T0137,140T0135,140T0135,137 
<180> | 496 DRAW,126,140T0130,130T0140,139T0134,140T 
0126,140 
<168> | 497 DRAW,151,137T0153,131T0157.131T0154,137T 
0151,137 
498 DRAW, 149,139T0151,130T0160,130T0155,145T 
<18> | 0159,145T0151,142T0154,142T0155,139 
<148> | 499 DRAW,155,139T0149,139 
<101> | 500 DRAW,167,140T0179,130T0180,130T0178,135T 
0171,135T0170,138T0175,138T0173,140 
<151> | 5901 DRAW1TO167,140:DRAW1,172,133T0174,131T01 
-<147> | 77,131T0176,133T0172,1393 
<59> | 502 DRAW,187,140T0190,139T0194,130T0193,131T 
<41> | 0197,131T0195,133T0192,133T0190,140 
503 DRAW1TO187,14® 
<1> 504 CHAR,8,20, "VERSION{ SPACE}2.01 SPACE}FUER 
SPACE}PLUS{ SPACE} 4" 
<156> | 505 CHAR,3, 22, "C{ SPACE} 1987 SPACE} BY{ SPACE}M 
<191> | Zt SPACE} SOFTWARE { SPACE} PRODUCTIONS" 
596 CIRCLE,27,179,7 
507 GOSUB568 : RETURN 
<100> | 508 REM SPIELFELD 
509 FORI=1T011:XZ(I)=0:NEXT:GRAPHIC1,1 
<16> | 510 KS=0:KQ=0:5K=0:50=0: IFGT+KK>OTHENSK=-99/ ( 
<173> | GT+KK) 
511 FORI=4TOOSTEP-1:FORR=8T027:CHAR,R,I,"{SP 
<121> | ACE}" :NEXT:NEXT 
512 BOX,60,0,240,49:DRAW,50,0T068,40:DRAW, 25 
<246> | 8,0T0240,40 
513 PAINT,245,5:DRAW,®,40T0319,40:DRAW,0,50T 
<211> | 0319,50:DRAW,180,65T090,199 
514 DRAW,180,65T0319.65:DRAW,2490,199T0319,5® 
<107> | :DRAW,252,175T0175,175T0220,110T0286,110 
515 DRAW, 257,130T0257,165T0287,165T0257,130: 
<198> | DRAW, 285/80T0312,115T0285,115T0285,8® 
. 516 DRAW, 287,165T0312,115:DRAW,257,130T0285, 
<219> | 80:PAINT1,55,0:PAINT,0,45 
517 FORI=4TOOSTEP-1:FORR=8T029:CHAR,R,I,"{SP 
<78> | ACE}" :NEXT:NEXT . 
<246> | 518 CHAR,8,1,A1$:CHAR,8,3,M$:CHAR, 26,1,STR$t 
KQ) :CHAR1,26,3,STR$ (KS) 
91> | 519 IFKO=KKANDKS=GT ORKK=-BANDGT=-®THENFORI=-1T 
02000 : NEXT: RETURN 
<156> | 520 ZU=RND(0)*1800+1000:FORI=1TOZU:NEXT 
1521 FORI=8T027:CHAR,1,1,"{SPACE}":CHAR,IT,3," 
44> | {SPACE} :NEXT 
522 SL=INT(RND(®)*6) 
48> | 523 SO=SO+SK-SL 
524 CHAR,14,0,"{CA CR CS SU SC SI SU SC SIN" 
60> | 525 CHAR.14,1,"(SPACE SB SPACE SB SPACE SB2 


<228> 
<162> 


<1427 
<183> 


<0> 
<2237 


. <1102 


<161> 


<13> 
<183> 


<62> 
<239> 


<111> 


<231> 
<85? 


<248> 
<8> 


<72> 
<44> 


<117> 
<1772 


<228> 
<158> 


<196> 
<193> 


<114> 
<38> 
<1647 
42332 
<205> 
<£67> 
<126> 
<58> 


<166> 


<23> 


<166> 
<103> 
<136> 
<99> 
<94> 


«2223 
<62> 
<1a1> 
<10> 
<9> 
<208> 


<252> 
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526 CHAR,14,2,"(SPACE SB SPACE SB SPACE SB C 
2 CR SM" 

527 CHAR,14,3,"{SPACE CE SPACE SJ SC SK CE S 
J Sky" 

528 CHAR,11,4,STR$(INT(SO))+".SPIELMINUTE" 
529 FORI=1T01508:NEXT 

530 FORI-4TOBSTEP-1 :FORR-8TO27:CHAR,R,I," (SP 
ACE} " :NEXT:NEXT 

531 EF=INT(RND(®) 100) 

532 IFKQ<KKANDKS<GTTHEN533 : ELSE534 

533 GF=INT(RND(®)*3) :ONGFGOTO536 ‚542 

534 _IFKS=GTTHEN536 

"535 IFKQ=KKTHEN542 

536 KQ-KQ+1:ZU=INT(RND(®)*11+1) : IFEF>9STHENE 
F$="ELFMETER" :ELSEEF$=" { SPACE} " 

537 IFLEFT$(LP$ (ZU) ,1)="-"ANDZU< 11 THENZU=ZU+ 
ı Pr 

538 IFZU=1THENZU=9 

539 CHAR,16,0,STR$ (KQ) +" (SPACE}-{ SPACE} "+STR 
$(KS) :CHAR,16,4,EF$ 

540 IFLEFT$(LP$(11),1)="-"ANDZU=11THENCHAR,1 
5,2,"EIGENTOR" :ELSECHAR,15,2,LP$ (ZU) 

541 FORI=1T02808 :NEXT:G0T0517 

542 KS=KS+1:ZU=INT(RND(®)*11+1) : IFEF>9STHENE 
F$="ELFMETER" : ELSEEF$=" { SPACE} " 

543 IFZU=1THENZU=9 

544 CHAR,16,4,EF$ 

545 CHAR, 16,0,STR$ (KQ) +" ( SPACE} -{ SPACE} "+STR 
$(KS) 

546 CHAR,15,2,N0Q$ (ZU) :BC(ZU)=BC (ZU) +1:XZ(ZU) 
=XZ (ZU) +1: FORI=1T02809 : NEXT: G0OT0517 











547 REM MUSIK 1 

548 RESTORES5S 

549 A=-8:DO 

558 READT,N,L:A=A+1: 1-11 

551 IFT>ZTHENFORI=1TOT:NEXTI:GOT0554 

552 SOUNDT,N,L 

553 IFPEEK(239)< >0TMENRETURN 

554 LOOPUNTILA=103:RESTORES55 : GOT0549 

555 DATA1,897,8,1,881,8,1,897,8,1,864,8,1, 89 


7,8,1,854,8,1,897,8,1,834,8,1,897,8 


556 DATA1, 822,8,1,897,8,1,834,8,1,897,8,1,85 


4,8,1,897,8,1,864,8,1,897,8,1,770,8 

557 DATA1,897,8,1,798,8,1,897.8,1,822,8,1,89 

7,8,1,834,8,1,897,8,1,822,8,1,897,8 

558 DATA1,834,8,1, 897, 8,1,854,8,1,897,8,1,86 

4,8 

559 DATA1,929,8,1,923,8,1,929,8,1,904,8,1,92 

9,8,1,897,8,1,929,8,1,881,8,1,929,8 

560 DATA1,872,8,1,929,8,1,881,8,1:929,8,1,89 

7,8,1,929,8,1,904,8,1,929,8,1,834,8 

561 DATA1,929,8,1,854,8,1,929,8,1,872,8,1,92 

9,8,1,881,8,1,929,8,1,897,8,1,929,8 

562 DATA1,881,8,1,929,8,1,897,8,1,929,8,1,90 

4,10,1,929,11,1,904,12,1.929,13 

563 DATA1,934,13,1,881,13,1,934,13,1,881,13, 

1,917..13,1,89771393,35917.19,1,897.19 

564 DATA1,929,13,1,.864,13,1,929,13,1,864,13, 

1,904,13,1,881,13,1,904,13,1,881,13 

565 DATA1,923,13,1,854,13,1,923,13,1,854,13, 

1,897,13,1,864,13,1,897,13,1,864,13 

566 DATA1,881,13, = 822, 13,1,881,13,1,822,13, 

1,864,13,1,834,13,1,864,13.1,834.13 

567 DATA1,854,13,1,784,13,1,854,13,1,784,13, 

598 

568 REM MUSIK 2 

369 VOL8:RESTORES74 

578 S=8:DO 

‚571 READA,B,C: IFA>2THENFORI=1TOA :NEXTI :GOTO5 

ar 

572 GETA$:IFA$< >" ( SPACE) "THEN573: ELSESOUND1, 

8,8:SOUND2,®,0:GRAPHIC® : RETURN 

573°SOUNDA,B,C:5=S+1 

574 LOOPUNTILS=96 : RESTORES574 : GOTO57® 

575 DATA1,171,165,2,854,45,2,810,7.5,2,834,7 
.5,2,854,30 

576 DATA2, 810,7.5,2,834,7. I, 2,854,15,2,864,1 

5,2,854,7.5 


48 


<99> 


<191> 
<70> 
<215> 


<78> 
<196> 
<199> 
<159> 
<117> 
<47> 


115: 
<240> 
<155> 
<13> 


<97> 
<224> 


<31> 


<160> 


<19> 
<122> 


<90> 
<31> 
<143) 
<219> 
<208> 
<45> 


'<12> 


<116> 
<58> 


<97> 

<218> 
<3> 

<241> 
<131> 
<22> 

<145> 
<202> 
<148> 
<103> 
<86> 
<255> 
<28> 
<59> 

<35> 
<2> 

553 | 
<75> 
<221> 
<71> 
<146> 


<221> 


577 DATA2,834,7.5,2,810,15,2,834,30,1,453,12 
® 

578 DATA2,819,15,2,798,15,2,770,30,2,739,30 
579 DATA2,770,30,1,384,30,2,798,30,1,455,30, 
2,810,60 

580 DATA1,171,30,508,1,1 

581 DATA1,171,165,2,854,45,2, 819, 7.5,2,834,7 
.5,2,854,30 

582 DATA2,810,7.5,2,834,7.5,2,854,15,2,864,1 
5,2,854,30 

583 DATA2,834,3,2,810,7.5,2,834,15,1,453,60 
584 DATA2,810,7.5,2,798,7.5,2,770,15,2,739,1 
5 

585 DATA2,770,15,1,384,15,2,798,15,1,455,15, 
2,810,30 

586 DATA1,171,30,500,1,1° 

587 DATA2,854,7.5,2,881,7.5,2,917,23,1,171,8 

7220100 

588 DATA2,917,23,2,171,5,2,917,7.5,2,929,7.5 

589 DATA2,917,30,2,910,45,1,455,45,25 897,45, 

1,385.116 


598 DATA2,383,190,2,897,15,2,910,15,2,897,30 

591 DATA2,881,60,1,171,69 

592 DATA2,810,7.5,2,834,7. 5,1,171,62,2.854,4 
5 ; 

593 DATA2,810,7.5,2,834,7.5,1,171,62,2,854,4 
5 

594 DATA2,810,7.5,2,834,7.5,1,518,60 

595 DATA2,854,15,2,864,15,2,854,7.5 

596 DATA2,834,7.5,2,819,15,1,455,120 

597 DATA2,834,30 

598 DATA2,810,15,2,798,15,2,770,30 

599 DATA2,739,30,1,385,30,2,770,30,1,455,30, 


2,798.30 

600 DATA1,171,60,2,819,60 

601 GRAPHIC1,1:DRAW,120,30T0200 ,30T0209,130T 

0249, 130T0169,1790T089,130T0129,130T0120,39 

692 IFGH=®THENCHAR1,10,1,"DU{ SPACE} BIST{ SPAC 

E}ABGESTIEGEN" :GOT0O696 

603 IFGH=1THENCHAR1,6,1,"DU{ SPACE} BEKOMMST (S 

PACE}KEINE{ SPACE} LIZENZ { SPACE} MEHR" 

604 DRAW,180,50T0149,50T0149,70T0180,70T0188 
‚99T0142,90 

685 DRAW,155,40T0155,1®®:DRAW,165,49T0165,198 

0) 

6906 GOSUB547:GRAPHICP:GOTO37® 

607 CHAR,10,24, "WEITER{SPACE}MIT{ SPACE}Y<SPAC 
E>" :GETKEYA$: IFA$=CHR$ (32) THENRETURN : ELSE607 

608 PRINT"{ CLEAR RVSON}BILANZ{SPACE}DES( SPAC 

E}YDFB-VEREINSPOKALSPIEL{SPACE8 RVSOFF}" 

699 IFAA$="B.MUENCHEN"THENFAS=70509 

61® IFAA$="1.FC{ SPACE}KOELN"THENFAS=55009 

611 ZF=INT(RND(®)*FAS)+5009 

612 PRINT" { DOWN} ZUSCHAUER{ SPACE?} :":;ZF 

613 PRINT" { DOWN} EINNAHME { SPACE8} : " ; INT(ZF*25 

/1.8) 

614 PRINT" DOWN RVSON}ABGABEN{ RVSOFF} " 

515 PRINT" { DOWN} SPIELERGEHAELTER: { SPACE} 4400 


an" r 

616 IFGT>KKTHENPAE=27000 -ELSEPAE=® 

617 IFGT=KKTHENPAE=11099 \ 
618 PRINT" { DOWN} PRAEMIEN{ SPACE8} :";PAE 
619 K=-K+INT(ZF*25/1.8)-440000-PAE 

628 PRINT" { DOWN2}NEUER { SPACE}KAPITALSSTAND{S 
EACE}VON{ SPACE} " ;M$;" :" : PRINT" { DOWN} "TAB (13) 
;K 

621 GOSUB697 :RETURN 

622 PRINT" (CLEAR RUSON) VEREINSINTERNE (. SPACE) 





























TORSCHUETZENLISTE{SPACE8S RVSOFF}" :BXC=@: FORI 


=1T018:BXC=BXC+BC(I): NEXT oo 
623 IFBXC-®THENPRINT" {DOWN SPACE}ALLE{ SPACE) 


184 SPACEYSPIELER{ SPACE}HABEN ( SPACE)YKEIN{SPAC 








EYTOR{ SPACEYERZIELT" :GOT0625 : ELSE624 

624 PRINT"{DOWN SPACE4}MOMENT{SPACE}BITTE.. 
":GOSUBB92, 

625 GOSUB607 : RETURN 5 

626 PRINT"{ CLEAR RVSON}PRIVATE{ SPACE} VERHAEL 
TNISSE{ SPACE19 RVSOFF}" 





<207> 
<41> 


<167> 
<31> 


<152> 


<153> 
<108> 


<180> 


<63> 
<37) 
<3> 
<112> 


<204> 
<185> 
<101> 


<254> 


<255> 
<160> 


:<198> 


<193> 
<85> 
<168> 


«2343 
<78> 
<64> 
<190> 
<150> 
«599 


<1867 
<1772 


<£153> 


<170) 
<30> 
<162) 
<9> 
<2> 


<128) 
<122> 


<225? 
<222> 
<108> 
<173) 
<184> 


<213> 


743 


<128> 


'<190> 


<223> 
<78> 


<226> 
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ven rn 


EEE 


|. 


627 v1$=" IL} \ v2$=" {1} :V3$=" " :vA$=" ” 

628 PRINT" {DOWN} FAMILIENSTAND: ";FA$ 

629 IFKI>OTHEN639 : ELSE632 

630 PRINT"KINDER:" :PRINT"NAME: "; 

631 FORI=1TOKI:PRINTTAB(8) ;NH$ (I) :NEXT 

632 PRINT"AUTO(SPACE10} :" ;AUT; "1 SPACE)YMERCED 
ES{ SPACE} 190 { SPACEYE" 

633 PRINT"HAUSTIERE{SPACES} :" ;HUN; "4 SPACE}HU 
ND(E)" 

634 FORI=1T049:PRINT"{SC}"; :NEXT. 

635 PRINT"STEUERLICHE( SPACE} ABGABEN{ SPACE} :{ 
SPACE}A®.0%" 

636 PRINT"VERSICHERUNGSABGABEN: { SPACE2)7.5%" 
637 IFVC=90RVC=110RVC=10RVC=30RVC=5ORVC=7THE 
NKGI=KI*150: ELSEKGI=® 

638 PRINT"KINDERGELD{SPACE18} :" ;KGI; "DM" 

639 FORI=1T040: PRINT" {SC}" ; :NEXT 

640 PRINT"BESONDERE( SPACE} VORKOMMNISSE:" 

641 KD=INT(RND(9)*20) : IFKD-OTHEN641 

642 IFKD=1ANDFA$="LEDIG"THENV1$="DU{ SPACE}HA 
ST SPACE} DICH SPACE) VERLOBT { SPACE} \" :MAG=MAG 
-1000 

643 IFKD=1ANDFA$="LEDIG"THENFA$="VERLOBT":GO 
T0674 

644 IFKD=1ANDFA$="VERLOBT"THENV1$="DU{ SPACE} 
HAST{ SPACE} GEHEIRATET { SPACE) ! " :MAG=MAG-10900® 
645 IFKD=1ANDFA$="VERLOBT"THENFA$="VERHEIRAT 
ET" :G0OT0674 e 

646 IFKD=1ANDFA$="VERHEIRATET"THENIFKI>STHEN 
641 

647 IFKD=1ANDFA$="VERHEIRATET"THENV1$="DU{ SP 
ACE) BIST. SPACE} VATER{ SPACE} GEWORDEN { SPACE} ! " 
648 IFKD=1ANDFA$="VERHEIRATET"THENV1=INT(RND 
(0) *3) :KI=KI+1 

649 IFKD=1ANDFA$="VERHEIRATET"THENIFV1<=1THE 
NV2$="ES{ SPACE) IST{ SPACE) EIN{ SPACE} JUNGE SPA 
.CE} H [3 

650 IFKD=1ANDFA$="VERHEIRATET"THENIFV1=2THEN 
V24="ES{ SPACE} IST { SPACE} EIN{ SPACE}MAEDCHEN{$ 
PACE}!“ 

651 IFKD=1ANDFA$="VERHEIRATET"THENIFVI 2THEN 
V2$="ES{ SPACE} IST{ SPACE) EIN{ SPACE} JUNGE SPAC 
E} ' “ 

‚652 IFKD=2ANDFA$="VERHEIRATET"THENV1$="DEINE 
.4 SPACE} FRAU { SPACE} IST ( SPACE} BEI { SPACEYEINEMI 
SPACE} AUTOUNFALL" 
653 ‚IFKD-2ANDFA$="VERHEIRATET"THENV2$="GESTO 
RBEN{ SPACE} ! " :FA$="LEDIG" 

:654 IFKD-3ANDAUT>OTHENV1$="DUt SPACEYHATTEST 
SPACE)EINEN{SPACE}UNFALL{ SPACEYUND{ SPACE)DEI 
N" 

655 IFKD=-3ANDAUT>OTHENV2$="AUTO{ SPACE}HAT{SP 
ACEYTOTALSCHADEN. " :MAG=MAG-50090 : AUT-AUT-1 
656 IFKD=4ANDAUT=OTHENV1$="DUt SPACE}HAST{ SPA 
CEYDIR{ SPACE} EINEN{ SPACEYMERCEDES{ SPACE} 1901 
SPACEYE1 SPACE)GE-" :V2$="KAUFT." 

657 IFKD=4ANDAUT=OTHENMAG=MAG-80099 : AUT=-AUT+ 
































1 
658 IFKD=STHENV1$="DUt SPACE)HAST { SPACE}DIR{S 
PACEYEINEN{ SPACE) HUND{ SPACE} GEKAUFT" :MAG=MAG 
-590 :HUN=HUN+1 
659 IFKD=-6THENV1$="DU{ SPACEYKAUFST( SPACE}LEB 
ENSMITTEL{SPACEYEIN" :MAG=-MAG-4A00 
660 IFKD=7THENV1$="DU{ SPACE)KAUFST{ SPACE}LEB 
ENSMITTEL { SPACE} EIN" :MAG=MAG-40® 
661 ‚IFKD-BANDSP=6THENV1$="DU{ SPACE}GIBSTI SPA 
CE) FUER4 SPACE) DEN { SPACE} VEREIN { SPACE} UND{ SPA 
CEYALLE{ SPACE} FANS" ge 
. 662 .IFKD-SANDSP=6THENV2$="EINE{ SPACE}GROSSEI 
SPACE} FEIER( SPACE} !" :MAG=MAG-2500® ; 
663 IFKD=9ANDVC-SANDFA$="VERHEIRATET"THENV1$ 
="DU{ SPACE} KAUFST { SPACE} DEINER{ SPACE}FRAU{ SP 
ACEY ZUM SPACE}GEBURSTAG" 
664 IFKD=9ANDVC=5ANDFA$="VERHEIRATET"THENV2$ 
="EINEN SPACE} PELZMANTEL" :AQ=AQ+1 :MAG=MAG-12 
500 
665 IFKD=10ANDVC=5ANDKI >OTHENV1$="EINES{SPAC 
EYDEINER( SPACE} KINDER ( SPACE} HAT SPACE}GEBURS 
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PROGRAMME Eu 


<89> 1 TAG{SPACEY!" 















































<185> | 666 IFKD=10ANDVC=SANDKI >OTHENV2$="DUl SPACHIK 
<25> | AUFST SPACE} IHM{ SPACE) EIN{ SPACEYGESCHENK" :MA 
<91> | G=MAG-29® E 

<0> 667 IFKD=11ANDFA$="VERHEIRATET"ANDK<-35000TH 


ENV1$="DEINE{ SPACE} FRAU{ SPACE}HAT{ SPACE}SICH 
{ SPACE} SCHEIDEN{ SPACE} " 
668 IFKD=11ANDFA$="VERHEIRATET"ANDK<-35000TH 
ENV1$=V1$+"LASSEN( SPACE} !" 

669 IFKD=11ANDFA$="VERHEIRATET"ANDK<-35000TH 
ENV2$="DU4 SPACE}YMUSST ( SPACE} DIE SPACE}GERICH 
TSKOSTEN ( SPACE} ZAHLEN! " = 
670 IFKD-11ANDFA$="VERHEIRATET'"ANDK<-35000TH 
-| ENV3$="DAS{ SPACE} SORGERECHT ( SPACE} FUER( SPACE 
YDIE{ SPACEYKINDER{ SPACEYWIRD" 

671 IFKD=11ANDFA$="VERHEIRATET"ANDK< -35000TH 
ENVA$="DEINER{ SPACE} FRAU { SPACE} ZUGESPROCHEN 
SPACE}! “ 

672 IFKD=-12THENVi$="DUt SPACEYHAST{ SPACE} IM(S 
PACEYTOTO{ SPACE} 2099 { SPACE} DM4 SPACE} GEWONNEN 
",MAG=MAG+ 2000 

.673 IFKD=>13THENV1$="KEINE." 

674 IFV1$=""THENV1$="KEINE." 

675 PRINTV1$:PRINTV2$:PRINTV3$ : PRINTV4$ 

676 IFKD=1ANDFA$="VERHEIRATET"ANDKI=>1THENIN 
PUT" {UP2}WIE( SPACE} SOLL{ SPACEYES{ SPACEYHEISS 
EN{ SPACE} " ;NH$ (KL) 

677 IFMAG=OTHEN678 : ELSEMAG=MAG-16625+KGI 

678 GOSUB607:6G0T077 

679 FORI=1T01590 :NEXT:PRINT"{DOWN SPACEYTSCH 
UVESS 4 SPACE} -{ SPACE} ICH, DAS{ SPACE} PROGRAMM, WE 
RDE{ SPACEYMICH" 

680 PRINT"{DOWN SPACEYNUN{ SPACE} LOESCHEN{ SPA 
CE} \ 4 SPACEYHA( SPACE} ! { SPACEYHA{ SPACE) ! {SPACE 
YHALSPACEY !" SE 

681 TRAP682 

682 FORI=1T02908 :NEXT:SY865529 

683 RESUMENEXT 

684 PRINT" CLEAR}DIE{SPACEYDERZEITIGE( SPACE) 
STAMMFORMATION: " 

685 FORI=1T049:PRINT"{SC}" ; :NEXT 

686 PRINT"SPIELERNAME" ; TAB(24) ; "MORAL" 

687 FORI=1TO11 

688. PRINTI;TAB(3) ;NQ$ (I) ;TAB(25) ;MO(I):NEXT 
689 PRINT" {SPACE RVSON}121{RVSOFF" SPACEYKEINE 
{ SPACE} AUSWECHSELUNG" 

690 PRINT" { DOWN}YWELCHER{SPACE}SPIELER{ SPACE} 
SOLL{ SPACE} AUSGEWECHSELT" : INPUT"WERDEN{ SPACE 
}-{ SPACE) NUMMER { SPACE} " ;UI 5 

691 IFUI=12THENFGJ=® : RETURN 

692 PRINT"{CLEAR SPACE}DERZEITIGE{SPACEYERSA 
TZSPIELER:" 
693 PRINT" {SPACE}121 SPACE}" ;NQ$(12) ;TAB(19); 
"TW" ;TAB(26) ;MO(I) : FORI=13T018:PRINTI; TAB(3) 
:NOS (I); 

694 PRINTTAB(26) ;MO(I):NEXT 

695 PRINT" { DOWNYUND{ SPACE}WELCHER { SPACE) SPIE 
LER{ SPACE}SOLL{ SPACE} EINGEWECHSELT" : INPUT"WE 
RDEN{ SPACE} - { SPACE}NUMMER{ SPACE} " ; 1 - 
696 NW$=NQ$ (UT) :AC=AL (UI) :MB=MO (UI) :BD=BC (UI 


) 

697 NQ$(UI)=NQ$ (I) :AL(UI)=AL(L) :MO(UI)=MO(T) 
:BC(UI)=BC(I) 

698 NQ$(I)=NW$:AL(I)=AC:MO(I)=MB:BC(I)=BD 
599 FORI=1T016 : IFIC=5THENMP=MP+MO (1) :G0OT0782 
708 IFI>SANDI<=8THENMK=MK+MO (I) :GOTO49 

791 IFI>BANDI<=11THENMG=MG+MO (I) :GOTO49 CE) 
792 NEXT. :MP=MP/5 :MK=MK/3:MG=MG/3 :MO= (MP+MK+M 

6)/3 

703 PRINT": CLEAR}DIE{ SPACE} NEUE{ SPACE} STAMMF 

ORMATION: " E 2 

704 FORI=1T040:PRINT"{CT}"; :NEXT 

785 FORI=1TO11 

Ze N] ;TAB(3) ;NQ$ (I) ;TAB(18) ;AL(I) ;TAB(2 
);MO(I) 

787 NEXT: PRINT" {DOWN SPACEYWEITERE{ SPACE} AUS 

WECHSELUNGEN SPACE} ?{ SPACE} J-N" ——. 

708 GETKEYA$: IFA$="J"THEN684 : ELSEIFA$="N"THE 


<148? 


<84> 
<198> 





<1427 
<12> 


<2377 
<1617> 
<1137 
<220> 
«1527 








2247 
<32> 
<131> 








<6> 
<62> 
<220> 
<150> 


<99> 
<225> 
<40> 


<193> 
<86> 


<88> 
<69> 





<68> 
<238> 








<8> 
<32> 
<38> 


<a 
dise> 





<155> 


<84>3 





<48> 
627 
’ 


«33 
<79> 


<124> 
<83> 


<140> 
<237> 
<199> 
973 


<78> 
<197> 
<158> 


<23> 


<143> 
<94> 

<196> 
<135> 


<193> 
<159> 
<221> 
<79> 
<121> 
<158> 
<7>2 
<119> 
<37> 
<233> 
<30> 
<6> 


<1743 


142) 


<225> 
<17> 
<94> 
<59> 
«234 > 
<120> 
<82> 
<97> 
<87> 


<124> 


4 


BEE PROGRAMME 


NSCNCLR: GOSUB849 : RETURN: ELSE708 

709 PRINT"{CLEAR RVSON}TRANSFERS/VERKAUF (SPA 
CE} VON{ SPACE} EIGENEN( SPACE}SPIELERN{ SPACE2 R 
VSOFF} "' 

710. IFMDE=80THENPRINT" { DOWN} DER SPACE} TRANSF 
ERMARKT { SPACE} IST{ SPACEYWEGEN { SPACE) EINES( SP 
ACE) EG-ER-LASSES{ SPACE} GESCHLOSSEN." 

711 IFMDE=80THENPRINT"NATIONAL{SPACE}WIE(SPA 
CEYIM{ SPACE} EG-BEREICH. ":GOT076 

712 PRINT" DOWN3} ";TAB(8) ; "WOLLEN{ SPACE}SIE{ 
SPACE)". : 
«733 PRINT" { DOWN} " ;TAB(8) ;"A) (SPACEYEINEN{ SPA 
CEYSPIELER( SPACE} VERKAUFEN" 

714 PRINT" {DOWN} " ;TAB(8) ;"B) {SPACE}EINEN{ SPA 
CE}SPIELER { SPACE} KAUFEN" 

715 GETKEYA$: IFA$="A"THEN716:ELSEIFA$="B"THE 
N736 : ELSE715 

716 PRINT"{CLEAR RUSON) VERKAUF {SPACE} EINES(S 
PACE)SPIELERS(SPACEI8 RVSOFF}" 

717 VF=INT(RND(0)*8) : IFTE$(VF)=M$THEN717 

718 ONVFGOSUB833,834,835,836,837,838,839 ,849 
719 PRINT"DAS{ SPACE} AUFGEBOT { SPACE} VON{ SPACE 
}";M$ : 

720 FORI=1T049:PRINT"{CT}"; :NEXT 

721 FORI=1T018:PRINTI;NQ$(I) ;TAB(2®) ;AL(T); ( 
26) ;MO(1) :NEXT 

722 INPUT" { DOWN}WELCHER{ SPACEYSPIELER{ SPACE} 
MUSS { SPACE} GEHEN { SPACE} -{ SPACE} NUMMER 4 SPACE} 
"ABC 

723 IFABC<=®0RABC>18THEN716 

724 PRINT"SIND{SPACE}YSIE{SPACEY SICHER SPACE} 
(J/N) 2" :GETKEYA$ : IFA$="J"THEN725 : ELSEIFA$="N 
"THEN76 :ELSE724 : 

725 IFVF=QORVF=LPTHENPRINT" { CLEAR)OK .DER{ SPA 
CE}SPIELER( SPACE} GEHT{ SPACE} INS ( SPACE} AUSLAN 
D.":G0T0727 

726 PRINT" { CLEAR}OK .DER{ SPACE} SPIELER{ SPACE} 
GEHT { SPACE} ZUM{ SPACE} VEREIN: " :PRINTSF$(VF) ;" 














727 PRINT"STE{ SPACE} BEKOMMEN { SPACE} " ;AL(ABC) 
*7090*MO (ABC) ; " ( SPACE} DEUTSCHE { SPACE}MARK.”: 
K=K+ (AL (ABC) *7000*MO (ABC) ) 

728 IFVF=0THEN734 


729 NW$=NO$ (ABC) :AC=AL(ABC) :MB=MO (ABC) 
738 NQ$(ABC)="------— ":AL(ABC)=®:MO(ABC)=®: 
BC(ABC)=® 


731 LP$(ABC)=NW$:AL(ABC)=AC:MO(ABC)=MB:BC(AB 
C)=® 

732 ONVFGOSUB841,842,843,844,845 ,846,847,848 
733 GOTO76 i 

734. NO$ (ABC) ="---—- --":AL(ABC)=0:MO(ABC)=0: 
BC (ABC)=0 

735 GOTO76 

736 PRINT"{CLEAR RUSONYKAUF (SPACE) EINES{ SPAC 
EISPIELERS{SPACE21 RVSOFF}" 

737 IFMO>8THENPRINT"DIE{SPACE}MORAL{ SPACE} IH 
RES ( SPACEY TEAMS { SPACE} IST{ SPACE} DOCH SPACE}S 
UPER{SPACH-" 

738 IFMO>STHENPRINT"WARUM( SPACEYALSO{ SPACE}K 
AUFEN ( SPACE) ? { SPACE} -{ SPACEYZUREUCK ( SPACE} IN 
51 SPACEYMENUE! " :G0T076 - 

739 PRINT" ( DOWN3} "TAB(8) "WOLLEN{SPACEISIE(SP 
ACE)EINEN{ SPACE} SPIELER" 

740 PRINT" { DOWN) "TAB(8) "A) {SPACE} VON{ SPACE}D 
ER{ SPACEYTRANSFERLISTE" 
741 PRINT" { DOWN) "TAB(8) "B) {SPACE} VON{ SPACEYE 
INEM{ SPACE} ANDEREN { SPACE} VEREIN" 

742 GETKEYA$ : IFA$="A"THENGOSUB437 : GOTO76::ELS 
EIFAS="B"THEN743:: ELSE740 

743 PRINT" { CLEAR) VON{ SPACE} WELCHEM{ SPACE} VER 
EIN{ SPACE)WOLLEN{ SPACE)STE{ SPACE) DEN" 

244 PRINT"SPIELER{SPACE): 

745 FORI=1T08:PRINTSPC (6) ;1;".) {SPACE2}" ;MN$ 
(I) :NEXT 

746 GETKEYA$: IFVAL(A$)< 1ORVAL(A$) >8THEN746 
747 IFVAL(A$)=LPTHENPRINTSPC (4) "EIGENE{ SPACE 
}SPIELER ( SPACE} KAUFEN ( SPACE} -{ SPACE} DAS( SPAC 
EIST" 
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<1> 748 IFVAL(A$)=LPTHENPRINTSPC (10) "JA SPACE}GA 
NZ{ SPACE}WAS { SPACE} NEUES" :GOSUB607 :G0T0743 
749 TE$-MN$ (VAL(A$)) 
<202> | 759 ONVAL(A$)GOSUB833,834,835,836,837,838,83 
9,849 
751 GOTO752 
<25> | 752 PRINT" { CLEAR}DAS { SPACE} AUFGEBOT{ SPACE} VO 
N{ SPACE}" ;TE$ 
<49> | 753 FORI=1T048:PRINT"{CY}" ; :NEXT 
754 FORI=1T018:PRINTI;TAB(3) ;LP$(I) ;TAB(20); 
<128> | AQ(I):NEXT . 
755 INPUT"AN{ SPACE} WELCHEM{ SPACE) SPIELER{ SPA 
<250> | CEYHAST{ SPACE} DU SPACE} INTERESSE ( SPACE} -( SPA 
CE2}NUMMER" ; 1: IFI>18THEN752 
<157> | 756 IFI=10RI=12THENPRINT"DIESER(SPACE}YSPIELE 
R{ SPACE} IST{ SPACE} NICHT { SPACE} VERKAEUFLICH{S 
<3> PACE} !" :GOSUB607:G0T0752 
757 DTV=INT(RND(®) *2000000)+150000 
<133> | 758 PRINT" { CLEARYTRANSFERVERHANDLUNG: ": FORP= 
<184> | 1T048:PRINT"{CY)"; :NEXT 
<115> | 759 PRINT"VERHANDLUNGSOBJEKT{ SPACES5} : ";LP$(I 
) 
<230> | 768 PRINT"DERZEITIGER{ SPACE} ARBEITGEBER: ";TE 
<98> |$ 
761 PRINT"VERHANDLUNGSPARTNER{SPACEA} : ";TE$ 
<239> | 762 PRINT"GEFORDERTE{ SPACE} ABLOESESUMME: " ; DT 
eV 
763 INPUT"BEREIT{ SPACE} ZU{ SPACE} ZAHLEN { SPACE 
<74> |} (DM) (SPACE) :" ;KFT:PRINT"NUN{ SPACEYWIRD{ SPAC 
<12> |) VERHANDELT ( SPACE} !":PRINT"ERGEBNIS:": 
764 IFKFT=>DTVTHENPRINT"DU{ SPACE}HAST {SPACE} 
DEN{ SPACE} SPIELER. " :MDE=MDE+1 : GOSUB6097 : GOTO7 
x 73 
ea? 765 IFDTV>2000000ANDKFT< 1000000THEN772 
766 IFKFT>DTV-100000THENPRINT"DU{ SPACE}HAST{ 
<245> | SPACEYDEN{ SPACE} SPIELER." :MDE-MDE+1 :GOSUB607 
:G0T0773 > 
767 IFDTV<1000000ANDKFT< 1000000 THEN772 
<109> | 768 IFKFT<DTV-3000@01THEN772 
769 P=100001:DO:P=P+1 : LOOPUNTILKFT<DTV-P 
77® PRINT"DIE{ SPACE} VERHANDLUNG { SPACE}WIRD{ 5 
<168> | FACE} VERTAGT{ SPACE} !" 
<114> | 771 DTV=INT(DTV-((DTV-KFT)/2)) :G0OSUB607:60TO 
<44> | 758 - 
772 PRINT"DAS( SPACE}YANGEBOT { SPACE}WIRD{ SPACE 
<249> | YABGELEHNT{ SPACE} ! ":GOTO76 
773 PRINT" { CLEAR}AUFGEBOT { SPACE} VON{ SPACE} "; 
<123> | M$: FORASDF=1T040: PRINT" (CY}"; :NEXT 
<ı3> | 774 FORE=1T018:PRINTE;NQ$ (E) ;TAB(20) ;AL(E);T 
<129> | AB(28) ;MO(E) :NEXT 
775 INPUT" { DOWN} UND{ SPACE}WELCHER ( SPACE} SPIE 
<253> | LER{ SPACE) SOLL{ SPACE} GEHEN { SPACE2}- { SPACEZYN 
<122> | UMMER" ;E: IFE<=10RE>18THEN773 
776 GK=4 :NW$=NQ$ (E) :AC=AL(E) :MB=MO (E) 
<169> 27 NO$(E)=LP$(I):AL(E)=AQ(I):MO(E)=GK:BC(E) 
778 LP$(I)»DN$ (MDE) :AQ(I)=DN(MDE) :GK=4:BC(I) 
<42> |-0 
779 K=K-KFT 
780 IFTE$=MN$ (1) THENGOSUBB41 
<183> | 781 IFTE$=MN$ (2) THENGOSUB842 
782 IFTE$=MN$ (3) THENGOSUB843 
<235> | 783 IFTE$=MN$ (4) THENGOSUBBAA 
784 IFTE$=MN$ (5) THENGOSUB845 
<60> | 785 IFTE$-=MN$ (6) THENGOSUBB46 
786 IFTE$=MN$ (7) THENGOSUBB47 
<64> |787 IFTE$=MN$ (8) THENGOSUBB48 
788 GOSUB607 ; PRINT" (CLEAR}WEITERE{ SPACE} EINK 
<171> NEUFE ( SPACE} (J-N)" 
789 GETKEYA$ : IFA$="J"THEN736 : ELSEIFA$="N"THE 
<51> N76:ELSE789 
<231> | 720 PRINT" {CLEAR RUSON}POKALSPIEL{SPACE)-(SP 
ACE)ELFMETERSCHIESSEN( SPACE1@ RVSOFFY" :GL=0: 
<143> | SK=@: PRINT"NR. { SPACE}SPIELER" 
<154> | 721 FORI=1T011;PRINTI;TAB(3) ;NQ$(I) :NEXT 
792 PRINT" { DOWN} GEBEN( SPACE} SIE{ SPACE)DIE(SP 
ACE}S( SPACEYNUMMERN ( SPACE} DER{ SPACE} SPIELER 
<251> | SPACEIEIN, DIE( SPACE) EINEN{ SPACE} ELFMETER ( SPA 





<67> 
<221> 


<17> 
<79> 


<£67> 
<95> 


<14> 
<222> 
<178> 
<63> 

<148> 


<108> 


<204> 
<229> 


<36> 
<1> 


«92 
<189> 


<21> 
<195> 
<68> 
<255> 


<249> 


<207> 
<227> 
<205> 
<91> 


<68> 
<65> 


<£173> 


<89> 

<177> 
<105> 
<132> 
<159> 
<186> 
<213> 
<240> 
<11> 


‚2383 


<42> 
<221> 


<51> 
<182> 
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u De ee 


nn Ks 1 a ce Be a ee Tu ce. A 


. 


— 


CEYSCHIESSEN ( SPACE} SOLLEN" 

793 FORI=1TOS 
794 PRINT'"NUMMER {SPACE}: ";1; :INPUTGS: IFGS>11 

ORGS=< OTHEN794 : ELSEZPS (I)=NQ$ (GS) :ZQ$ (I) =LP$ 

(GS) : NEXT 

795 PRINT" { CLEAR}DIE{ SPACE} SCHUETZEN: { DOWN} " 

PRINT" {RVSON) " ;M$; " {RVSOFF} : “;TAB(22) ;"{RVS 

ON)" ;A1$ ; " {RVSOFF) : { DOWN} " 

796 FORI-1T05:PRINTZP$ (I) ;TAB(23) ;ZQ$ (I) :NEX 

T 








797 PRINT"{DOWN RVSON SPACEYTASTE{SPACEYDRUE, 


CKEN{ SPACE RVSOFF} " :GETKEYA$ ö 





798 FORI=1T05: PRINT" {CLEAR} " ;ZP$ (I) ;"USPACE} » 


LEGT { SPACE} SICH{ SPACE} DEN { SPACE} BALL{ SPACE}Z 
URECHT, " 

799 FORGS=1T01000:NEXT: PRINT"LAUEFT{ SPACE}AN 
‚UND... .":ZG=INT(RND(®) *20) :FORGS=1T02008 :NEX 





ir : 

800 IFZG<7THENPRINTLP$ (1); "{SPACE}HAELT{SPAC 
EDEN SPACE} STRAFSTOSS { SPACE} !" :GOTO8®3 

801 IFZG=-7THENPRINT"SCHIESST { SPACE} VORBEI {SP 
ACE} !" :GOT0803 : 
802 IFZG>7THENGL=GL+1 :PRINT"VERWANDELT {SPACE 
YDEN { SPACE} ELFMETER{ SPACE} : " ;GL; "{ SPACE} -(SP 
ACE}" ;GK: FORGS=1T0309® : NEXT 

803 FORGS=1T0300® : NEXT: PRINT" { CLEAR} " ;ZQ$(I) 
;" SPACE) LEGT { SPACE} SICH SPACEYDEN{ SPACE} BAL 
Li SPACE} ZURECHT, " 
804 FORGS=1T01000: NEXT: PRINT"LAEUFT{ SPACE} AN 
‚UND... ":ZG=INT(RND(®) *20) :FORGS=1T02809::NEX 
# ! 

805 IFZG< 7THENPRINTNQ$ (1) ; "{ SPACE)HAELT{ SPAC 
EYDEN{ SPACE} STRAFSTOSS{ SPACE} !" :GOTO808 

806 IFZG=7THENPRINT"SCHIESST{ SPACE} VORBEI {SP 
ACE} !" :GOTOR®8 

807 IFZG>7THENGK-GK+1 : PRINT" VERWANDELT {SPACE 
}DEN { SPACE) ELFMETER{ SPACE) :" ;GL; "{ SPACE} -{SP 
ACE}";GK 

908 FORGS-1T03090 : NEXT: NEXT 

809 IFGL<GKORGL>GKTHENPRINT"UND{ SPACEYNUN {SP 
ACE}DAS{ SPACE) ENDERGEBNISS: " :KK=KK+GK :GT=GT+ 
GL: GOSUB607 : RETURN 

819 PRINT" {CLEARYUNENTSCHIEDEN." 

811 PRINT"NR. {SPACE}SPIELER" 

812 FORI-1T011:PRINTI;TAB(3) ;NO$(I):NEXT 

813 INPUT"WER( SPACE}SOLL{ SPACE} SCHIESSEN { SPA 
CEY-{ SPACE) NUMMER{ SPACE} " ;E: IFI>11ORI< =OTHEN 
810 

a14 PRINT" {CLEAR}OK.BEIDE{ SPACE} SCHUETZEN{ SP 
ACE)WAREN4 SPACE} NUN{ SPACE} AKTIV." :PRINT"HIER 
{ SPACE} DAS{ SPACE} ERGEBNISS: " 

815 FORGS-1T03000:NEXT:ZG=INT(RND(®) *20) :ZOP 
=INT(RND(9)*20) 

816 IFZG>7THENPRINTNQ$ (I) ;TAB(12);":{SPACEYV 























" ERWANDELT" :GL=GL+1 


817 IFZG<=7THENPRINTNA$ (I) ;TAB(12) ;": (SPACE) 
DANEBEN" 

818 IFZOP>7THENPRINTLP$(1);TAB(12);": {SPACE} 
VERWANDELT" :GK=GK+1 

819 IFZOP<=7THENPRINTLP$ (I) ;TAB(12);": (SPACE 
}DANEBEN" 

820 PRINT"ERGEBNIS:";GL;"{SPACE}-{SPACE}" ;GK 
: FORGS=1T02990 : NEXT: GOTO899 

821 WAR$="" 

822 FORI=1TO11:IFLEFT$ (NQ$ (I), 1)="-"THENWARS$ 
=" { CLEAR} DU{ SPACE} KANNST{ SPACE}NUR{ SPACEYMIT 
{ SPACE} 114 SPACE} SPIELERN{ SPACE}SPIELEN" 

823 NEXT - 

924 "IFWAR$=""THEN95 : ELSEPRINTWAR$ :GOTO76 

825 FORI=1T018:NQ$(I)=VA$(I):AL(I)=VALT):NEX 
T:RETURN 

826° FORI=1T018:NQ$(I)=VB$ (1) 
T:RETURN 

827 FORI=1T018:NQ$(I)=VC$ (TI) 
T:RETURN 

828 FORI=1T018:NQ$(I)=VD$ (I) 
T: RETURN 

#29 FORT=1T018:NO$(T)-VES(T) 





:AL(I)=VB(I) :NEX 
:AL(I)=VC(I):NEX 
:AL(I)=VD(I):NEX 
:AL(I)=VE(I) :NEX 


C16-SA 4/88 





<60> 
<123> 


<165> 


<227> 
<174> 
<186? 


<2> 


<87> 
<90> 
<181> 


<82> 
<112> 


<108> 
<84> 
<85> 


<15> 
<225> 


<13> 
<160> 
<113> 
<203> 


<98> 


<209> 
<28> 
<94> 
<102> 
<> 

<10> 
<162> 
<203> 


<99> 
<188> 
<240> 


<167> 
<215> 


<7> 
<55> 





1872 


PROGRAMME Eu 


T:RETURN 


830 FORI=1T018:NQ$(I)=VF$(I):AL(I)=VF(I) :NEX 


T:RETURN 


831 FORI=1T018:NQ$(I)=VG$(I):AL(I)=VG(I):NEX 


T: RETURN 


832 FORI=1T018:NQ$(I)=VH$(T) :ALCI)=VHLI) :NEX 


T:RETURN 


833 FORI=-1T018:LP$(I)=VA$(T):AQLI)=VALI) :NEX 


T:RETURN 


834 FORI=1TO18:LP$(I)=VB$(I):AQ(I)=VBLI)SNEX 


T: RETURN 
835 FORI=1TO18:LP$(I)=VC$(I):AQLI)=VCCI) :NEX!: 
T: RETURN 2 


836 FORI=1T018:LP$(I)=VD$LT):AQLI)=VD(I):NEX 


T:RETURN 


837 FORI=1T018:LP$(I)=VE$(I):AQ(I)=VE(I):NEX 


T: RETURN 


838 FORI=1T018:LP$(I)=VF$(I):AQLI)=VF(I) :NEX 
T:RETURN : 

829 FORI=1T018:LP$(1)=VG$ (I) :AQ(I)=VGCT) :NEX 
T: RETURN 

848 FORI=1T018:LP$(I)=VH$(I) :AQCI)=VH(I) :NEX 
T:RETURN 

841 FORI=1T018:VA$(I)=LP$(I):VA(I)=AQLT) :NEX 
T: RETURN 


842 FORI=1T018:VB$(I)=LP$(I):VBLI)=AQ(I):NEX ' 


T:RETURN 

843 FORI=1T018:VC$(I)=LP$(I):VC(IJ=AQLT):NEX 
T: RETURN i 

844 FORI=1T018:VD$(E)=LP$(I).:VDLI)=AQLI):NEX 
T:RETURN 

845 FORI=1T018:VE$(I)=LP$(I):VECI)=AQLI):NEX 
T:RETURN 

846 FORI=1T018:VF$(I)=LP$(I):VF(I)=AQLI):NEX 
T:RETURN 

847 FORI=1T018:V6$(I)=LP$ (I) :VG(I)=AQLT) :NEX 
T:RETURN 

848 FORI=1T018:VH$(I)=LP$(I) :VHLI)=AQLI) :NEX 
T:RETURN 





CE4 SB SPACE4 SB SPACE6 SB}“ 

851 PRINT" {SB}MANNSCHAFT{SBYABW. {SB)MIT. (SB) 
ANG . {SB} GESAMT (SB) " 

852 PRINT"(CQ SC1@ S+.5C4 S+ 5C4 S+ 5C4 St S 
c6 CW} 

853 PRINT" {SB}" ;LEFT$(M$,10);TAB(11);"(52}": 
TAB(12) ;INT(MP) ;TAB(16) ;"{SB SPACE}" ;INT(MK) 
854 PRINTTAB(20);"(SB SPACE}“ ;INT(MG) ;TAB(23 
);"(5B}";INT(MO) ;TAB(33) ;"(SB}" 

855 PRINT"(CQ SC1@ S+ SC4 S+ SC4 S+ 5C4 S+ 8 
c6 CW} . 

856 IFFGJ=1THENPRINT"{UP CZ SC10 CE SC4 CE S 
c4 CE SC4 CE SC6 CX}" :G0T0862 

857 FORI=1T03: YJ(L)=INT(RND(+9)*7) :YI=YI+YJI ( 
1) :NEXT:YJ=YJ/3 

858 PRINT"{5B}";LEFT$(A1$,10);TAB(11);"(53)" 
;TAB(12);YJ(1) ;TAB(16);"{SB SPACE}" ;YJ(2);TA 
B(20);"{SB SPACE)“: 

859 PRINTYJ(3) ;TAB(23) ;"(SB}";INT(YJ) ;TAB(33 
);" 52)" 

860 PRINT"(CZ SC1@ CE SC4 CE SC4 CE SC4 CE S 
c6 CX} 

861 ONM-1G0SUB115,117.120,123,126,129,132 
862 IFMP<ATHENMP=1 

863 IFMK<1THENMK=1 

864 IFMG<1THENMG=1 

865 IFMP>1OTHENMP=1® 

866 IFMK>1OTHENMK-=10 

867 IFMG>1ATHENMG=1® 


868 PRINT"ZUSTAND{ SPACE}DEINER( SPACE} TRUPPE: 
869 
878 
871 








PRINT'"ABWEHR { SPACE4} :"; ZUT$ (MP) 
PRINT"MITTELFELD: " ; ZUT$ (MK) 
PRINT"ANGRIFF {SPACE3)} :" ; ZUT$ (MG) 
IFFGJ=1THENFGJ=9: RETURN 


<1033 
<151> 
<199> 
<247> 
<11> 
«59> 
<155> 
<263> 
<251> 
<43> 
<91> 
<24> 
<59>- 
<94> 
<129> 
<164> 
<199> 
<234> 
<13> 
<23> 
«183 
<155> 
«1933 


<152> 
<251> 
<196> 
<90> 

<254> 


<147> 
<68> 


<27> 
<146> 
<232> 
<178> 
<135> 
<106> 
<47> 
<a> 


<139> 
<69> 

<122> 
<172> 
<223> 
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 BBEEM PROGRAMME 


873 PRINT" ( DOWN}WOLLEN{ SPACE}SIE{ SPACE}AUSWE 


CHSELN{ SPACE} (J/N) {SPACE} ?" <98> 
874 GETKEYAS$ <83> 
875 IFA$="J"THENGOSUB684 : RETURN: ELSEIFAS="N" 
THENRETURN : ELSE874 <209> 
876 RESTORE877 : FORI=1T088:READDN$ (I) ‚DN(I):N 

EXT: RETURN <124> 
877 DATAHANNES, 30,M. JAKOBS,28,PRUS,18,THON, 2 
1.MARQUARDT, 20, DICKGIESSER, 26 <156> 
878 DATAFINKE,27,LUX,24,SCHOEN, 25, TRIEB, 26,B 
UEHRER, 27, LIPPMANN, 26 <63> 
879 DATASTORCK, 24 ,KLEPPINGER,29,MC LEOD, 28,2 

ORC', 24, DICKEL, 25,MILL, 29 <77> 
880 DATAK. REINHARDT, 19, BUNCOL,28,F.GOETZ, 25, 

RÖLFP, 27 ,WAAS, 23, CHA-BUM, 33 a <245> 
881 DATABRUNNER,24,GISKE,27.SCHWABL,21,ECKST 
EIN, 23,DUSEND, 27 ,WOEHRLIN, 30 <195> 
882 DATAFRANUSCH, 28,PILIPOVIC,29,SPIES,22,BO 

GDAN, 30 ,KELLER,19,KNOLL, 29 <248> 
883 DATAWOJCICKI, 29,KELSCH, 32, BLAETTEL,26 ‚W. 
SCHAEFER, 28, TURCONE, 24,GEILS, 32 <23> 
884 DATAHELLBERG,24,WILLMER, 28,GUE,24,REICH, 
27,F.HARTMANN, 26 ,DIERSSEN, 27 <235> 
885 DATAHERGET, 31, BOMMER,29,F.FUNKEL,33,PRYT 
Z,27,MATHY, 25,WITECZEK, 18 <182> 
886 DATAREEKERS, 21,K.FISCHER,37,LEIFELD, 21,L 

EGAT, 18, BENATELLI, 24, LAMECK,, 37 <246> 


887 DATABIALON, 23, YAVUZ,21,VUJAVIC,22,LOEW,2 


Allen Programmautoren dieses Hefts an dieser Stelle herzlichen Dankt 


Wer sich ebenfalls als Programmautor versuche möchte oder erneut sich 
beteiligen will, schneide bitte den Bewerbungsbogen mit der Schere aus 
und fülle ihn aus. Ihr selbstgeschriebenes Programm tritt in Konkurrenz 
zu sehr anspruchsvollen anderen Programmeinsendungen. Wenn Sie 
keine Befürchtungen haben, daß Ihr Programm unserer Qualitätsprüfung 
nicht standhält, schicken Sie uns Ihr Programm per Briefsendung. Eine 
Veröffentlichung lohnt sich auch finanzielll 






Name: 





Straße: 





Titel des Programmes: 





KBytes 





Erforderlicher Speicherplatz: 


Erforderliche Peripherie: 


Bewerbung als Programmautor 


Vorname: 


Wohnort: 





Bitte legen Sie Ihrer Bewerbung einen adressierten und frankierten 
Rückumschlag (DIN A4, 1,40 DM) beil 


Ich versichere hiermit, daß ich der Autor des obengenannten Programmes bin und alle Rechte besitze. Ich bin damit einverstanden, 
daß Sie mein Programm in einer Zeitschrift abdrucken und/oder dieses verkaufen. Das einmalige Honorar beträgt 120 DM pro ab- 


7,U.WEGMANN „23, V.ABRAMCZIK, 24 825: 


888 DATASABOROWSKI , 29, ELLGUTH, 22,H.SCHROEDER Aa ; 
244> 


‚29,KRELLA,23,J.HALLER, 25 
889. DATASCHUELER, 29 ,KUHL,25,LINZ,22, BAER, 25, 
ELSER,28,R.ALLGOEWER, 23 <138> 
89@ DATAA.KAISER,23,WEIKL,33, PREETZ,19 <219> 
891 GRAPHIC®:CHAR,®,@,"":PRINT"{ CLEAR}FUSSBA 
LL-MANAGER{ SPACE} PLUS ( SPACE} 4“ :PRINT"GAME( SP 
ACE}OVER" : END <197> 


892 WEX=18:FORI=1T018:BTC(I)=BC(I) :NEXT 2% 2> 


893 FORI=1T018:DR=-99999 :FORUY=1TO18 <56> 
894 IFBTC (UY)<=DRTHEN896 <90> 
895 DR=BTC (UY) : IO-UY <199> 


896 NEXT <5> 








897 PT(1)=IO:BTC(IO)=-BTC (10) :NEXT <236> 
898 FORI=1TO18 . k <84> 
899 IFBTC(I)=OTHENWEX=WEX-1:NEXT:ELSENEXT <152> 
908 PRINT"{UP SPACE4}NAME{SPACE16} TORE{ DOWN} an 
901 FORI=1TOWEX:UK=PT(I):PRINTI;NQ$ (UK) ;TAB( 

24) ;-BTC (UK) <34> 
902 NEXT <11> 
903 IFWEX-Q@THEN9®5: ELSEPRINT"{DOWN SPACE}ALL 

Ei SPACE} ANDEREN" ; 18-WEX ; "SPIELER{ SPACE}HABEN 

{ SPACE}KEIN { SPACE}TOR" <155> 
904 PRINT" { SPACE}ERZIELT." <63> 
925 RETURN <26> 


ENDE DES LISTINGS 


Eine solche Veröffentlichung kann sich manchmal etwas verzögern. Wir 
treffen zunächst’eine Vorauswahl unter dem Gesichtpunkt der Qualität 
und stellen im Anschluß eine Auswahl speziell für ein Heft zusammen. 
Wenn ein bereits ausgewähltes Programm sich nicht in die Konzeption 
einfügen läßt, wird es zurückgehalten, um vielleicht in einer späteren Aus- 
gabe berücksichtigt zu werden. Werden Sie also nicht ungeduldig, wenn 
Sie nicht sofort nach der Einsendung eine eindeutige Zusage erhalten. 
Honöriert werden dabei nicht nur die Qualität der Programmierung, son- 
dern auch die Originalität der im Programm realisierten Idee. 

Volker Lohrengel 







Alter: 








Computersystem: 











gedruckter Seite. Sollte das Programm nicht veröffentlicht werden, bitte ich um Rücksendung meiner Unterlagen. Sollte mein Pro- 
gramm in der Zwischenzeit von anderer Seite erworben worden sein, werde ich Sie unverzüglich benachrichtigen. Ich bestätige durch 
meine Unterschrift, daß ich Kenntnis davon habe, daß der Tronic-Verlag gegen Personen, die Programme einschicken, deren Ur- 
heberrechte sie nicht besitzen, rechtliche Schritte einleitet. 


Unterschrift des Programmautors (ei Minderjährigen auch die eines Eizlohungeberschtigteng 77777277 ru re ee Be ie 
Folgende Unterlagen liegen diesem Schreiben bel: 
Kassette: Diskette: 















Listing: Rückporto: 

















Dokumentation: 






‚Unterschrift des Programmautors (bei Minderjährigen auch die eines Erziehungsbersohligten: 
Einsenden an: Tronic-Verlag Abt. Programmentwicklung, Am Stad, 3440 Eschwege 











(Bitte zweimal unterschreiben!) 
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Zur Eingabe der Listingsprogramme 





für € 64/C 16/Plus 4 


Klartext-Tabelle für Commodore 64 


Eingabehinweise für alle Commodore-Rechner! 


Wer sich schon etwas näher mit CGommodore-Rechnern befaßt hat, wird sicherlich 
wissen, daß der Grafiksatz des C 64 und C 16 sehr viele ähnliche Symbole enthält. 
Aus diesem Grund ist es oft sehr schwer, einzelne Zeichen, wie zum Beispiel ho- 
rizontale Linien, voneinander zu unterscheiden. macht sich dieser Nach- 
teil in Listings bemerkbar, welche die Bildschirmgrafik mit PRINT-Zeilen aufbauen. 
Bisher haben wir in unseremAusdruck lediglich die Steuersequenzen wie CTRL- 
RVS ON oder CTAL-BLUE durch Klartext ersetzt, ab dieser Ausgabe werden je- 
doch auch alle Grafikfikzeichen durch ein Schlüsselcode ersetzt. Durch diese Met- 
hode sind Verwechselungen praktisch völlig ausgeschlossen. 

Alle sogenannten Sonderzeichen (z.B. eine Farbe) sowie ein Grafikzeichen, wer- 
den in unseren LISTINGS durch ein CODEWORT, welches die Taste bzw. Tasten- 
kombination kennzeichnet, ersetzt. Eine Tabelle der Tastenfunktionen finden Sie 
in dem Tronic-Magazin Compute mit. Das folgende Beispiel zeigt den Unterschied 
zwischen unserem alten und dem neuen Druckverfahren: 


64 LISTING MIT CHECKBUMMEN 1C vu 


10 REM. BISHERIGER AUSDRUCK <110> 
20 PRINT" (DOWN) <52> 
30 PRINT" ——— I. =" <95> 
80 PRINT" „Stel ? <149 
50 PRINT"ENDE" <246> 


ENDE DES LISTINGS 
tDRUCK:F.B.3 
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10 REM NEUER AUSDRUCK <162> 
20 PRINT" (DOHNS SQ CY2 SEI" <52> 
30 PRINT" (SA SB SC SD SE SE SG SU 22 52 803" <a5> 
40 PRINT" (CA CB CC CD CE CE C62" <109 
So PRINT"ENDE" <246> 


ENDE DES LISTINGS 


Wie in diesem Beispiel zu erkennen ist, werden alle Steuertasten durch die ent- 
sprechende Tastenbeschreibung markiert. Das Wort DOWN steht in diesem Fall 
für Cursor nach unten. Die Zahl dahinter gibt an, wie oft die Taste betätigt werden 
muß. In unserem Beispiel müßte also die Taste CURSOR abwärts viermal betätigt 
werden. Die genaue Beschreibung, welche Taste gemeint ist, entnehmen Sie bitte 
der Klartext-Tabelle, welche am Ende dieser Beschreibung abgedruckt ist. Ach- 
tung, für C 16 und C 64 existieren zwei verschiedene Tabellen! 
Wie ebenfalls aus dem Beispiel zu erkennen ist, werden auch alle Grafikzeichen 
durch einen 2-Buchstaben-Oode ersetzt. Der erste Buchstabe ist entweder ein »S« 
oder ein »C«. Das »O« steht für die „COMMODORE-TASTE« und das »S« für die 
»SHIFT-TASTE«. Der zweite Buchstabe bezeichnet die Aufschrift der Taste. Das 
»SA« in unserem Beispiel bedeutet also, daß die Taste SHIFT zusammen mit dem 
Buchstaben »A« betätigt werden muß. »C +«würde bedeuten, daß die Taste COM- 
MODORE zusammen mit dem PLUS-Zeichen gedrückt wird. Wird direkt hinter die- 
ser Buchstabenkombination eine Zahl angeben, so gibt diese die Anzahl der je- 
weiligen Zeichen an. Das Zeichen COMMODORE Y wurde also in unserem Beis- 
piel 9mal eingegeben. Durch diese Methode entfällt das lästige Abzählen von 
mehrfachen Zeichen. 
Um in Listings Tastenbezeichnungen von normalen Zeichen zu unterscheiden, wer- 
den alle Tastenbezeichnungen in geschweiften Klammern gesetzt. Diese dürfen 
selbstverständlich nicht eingegeben werden. Auch Leerzeichen innnerhalb ge- 
schweifter Klammern dienen nur zur Trennung einzelner Tastenfunktionen und dür- 
fen ebenfalls nicht eingegeben werden. Um die Tastenfunktionen noch besser her- 
vorzuheben, werden diese in unterstrichener Kursivschrift (Schrägschrift) darge- 
stellt. Alle Zeichen außerhalb der geschweiften Klammern werden normal abge- 
druckt und auch eingegeben. 
Im ersten Moment hört sich das sicher etwas kompliziert an, ist jedoch in der Pra- 
xis ganz einfach. Wenn man sich erst einmal an die in Klartext geschriebenen Zei- 
chen gewöhnt hat, wird man den großen Vorteil dieser Schreibweise erkennen. 
Frank Brall 
Noch eine wichtige Anmerkung! 
“Aus technischen Gründen können drei Zeichen von unserem Ausgabegerät nicht 
a werden. Diese Zeichen sind: Pfeil nach links, engl. Pfund, Pfeil nach 
n. 
__ Steht für den Pfeil nach links 
7. Steht für das engl. Pfund-Symbol 
: ‚Steht für Pfeil nach oben 


C16-SA 4/88 


C... 
SHIFTSPACE 


CURSOR ABWÄRTS 
CURSOR HINAUF 
CLEAR SCHIRM 
EINFÜGEN 
CURSOR IN ECKE 
CURSOR RECHTS 
CURSOR LINKS 
LEERZEICHEN 
DELETE $ 
FUNKTIONSTASTE 
FUNKTIONSTASTE 
FUNKTIONSTASTE 
FUNKTIONSTASTE 
FUNKTIONSTASTE 
FUNKTIONSTASTE 
FUNKTIONSTASTE 
FUNTKIONSTASTE 
SCHWARZ 

WEISS 

ROT 

TÜRKIS 

PURPUR 

GRÜN 

BLAU 

GELB 

INVERSE EIN 
INVERSE AUS 
ORANGE 

BRAUN 

HELLROT 
DUNKELROT 
MITTELGRAU 
HELLGRÜN 
HELLBLAU 
HELLGRAU 
CTAL-ZEICHEN 
GRAFIK-ZEICHEN , 
GRAFIK-ZEICHEN 
UNSICHTBARER CODE 





TASTE NEBEN RECHTEN: SHIFT  ' St 
SHIFT-TASTE & TASTE NEBEN RECHTEMSHIFT 
SHIFT-TASTE & 2. TASTE GANZ RECHTS OBEN 
SHIFT-TASTE & TASTE GANZ RECHTS OBEN 
2. TASTE VON GANZ RECHTS OBEN 

TASTE GANZ RECHTS UNTEN 

SHIFT-TASTE & TASTE UNTEN RECHTS 
LEERTASTE (GRÖSSTE TASTE) 

TASTE GANZ RECHTS OBEN 
FUNKTIONSTASTE Fi 

FUNKTIONSTASTE F2 


“ FUNKTIONSTASTE F3 


FUNKTIONSTASTE F4 
FUNKTIONSTASTE FS5 
FUNKTIONSTASTE F6 
FUNKTIONSTASTE F7 
FUNKTIONSTASTE F8 
CONTROL-TASTE & 1 
CONTROL-TASTE & 2 
CONTROL-TASTE & 3 
CONTROL-TASTE & 4 
CONTROL-TASTE & 5 
CONTROL-TASTE & 6 
CONTROL-TASTE & 7 
CONTROL-TASTE & 8 
CONTROL-TASTE & 9 
CONTROL-TASTE & 0 
COMMODORE-TASTE & 
COMMODORE-TASTE & 
COMMODORE-TASTE & 
COMMODORE-TASTE & 


COMMODORE-TASTE & 6 
COMMODORE-TASTE & 7 
COMMODORE-TASTE & 8 

CONTROL-TASTE UND DAS....ZEICHEN 
SHIFT-TASTE UND DAS ... ZEICHEN 
COMMODORE-ZEICHEN UND DAS ... ZEICHEN 
SHIFT-TASTE UND SPACE 


Klartext-Tabelle für Commodore C 16 und Pius 4 


Klartext Tanente PET En 


DOWN 
up 


CURSOR ABWÄRTS “ 
CURSOR HINAUF 
CLEAR SCHIRM 
EINFÜGEN 
CURSOR IN ECKE 
DELETE 

CURSOR RECHTS 
CURSOR LINKS 
LEERZEICHEN 
FUNKTIONSTASTE 
FUNKTIONSTASTE 
FUNKTIONSTASTE 
FUNKTIONSTASTE 
FUNKTIONSTASTE 
FUNKTIONSTASTE 
FUNKTIONSTASTE 
FUNKTIONSTASTE 
SCHWARZ 

WEISS 

ROT 

TÜRKIS 

PURPUR 

GRÜN 

BLAU 

GELB 

INVERSE EIN 
INVERSE AUS 
ORANGE 

BRAUN _ 
GELBGRÜN 

ROSA 
BLAUGRÜN 
HELLBLAU _ 
DUNKELGRÜN 
HELLGRÜN 
CTAL-ZEICHEN 
GRAFIKZEICHEN 
GRAFIKZEICHEN 
BLINKEN EIN 
BLINKEN AUS 


TASTE NEBEN INST DEL: RECHTS OBEN - 

3. TASTE NEBEN DOWN VON RECHTS OBEN 
TASTE ÜBER RETURN ZUSAMMEN MIT SHIFT 
SHIFT-TASTE & TASTE GANZ RECHTS OBEN 
2. TASTE VON GANZ RECHTS OBEN 

TASTE GANZ RECHTS OBEN 

4. TASTE VON RECHTS OBEN 

5. TASTE VON RECHTS OBEN 

LEERTASTE (GRÖSSTE TASTE) 
FUNKTIONSTASTE F1 (VORHER DEFINIEREN) 
FUNKTIONSTASTE F2 (VORHER DEFINIEREN) 
FUNKTIONSTASTE F3 (VORHER DEFINIEREN) 
FUNKTIONSTASTE F4 (VORHER DEFINIEREN) 
FUNKTIONSTASTE F5 (VORHER DEFINIEREN) 
FUNKTIONSTASTE F6 (VORHER DEFINIEREN) 
FUNKTIONSTASTE F7 (VORHER DEFINIEREN) 
FUNKTIONSTASTE F8 (VORHER DEFINIEREN) 
CONTROL-TASTE & 1 

CONTROL-TASTE & 2 

CONTROL-TASTE & 3 

CONTROL-TASTE & 4 

CONTROL-TASTE & 5 

CONTROL-TASTE & 6 


COMMODORE-TASTE 
COMMODORE-TASTE 
COMMODORE-TASTE 
COMMODORE-TASTE 
COMMODORE-TASTE 
COMMODORE-TASTE & 
CONTROL-TASTE UND DAS ...ZEICHEN 
SHIFT-TASTE UND DAS ... ZEICHEN 
COMMODORE-TASTE UND DAS ... ZEICHEN 
CONTROL-TASTE UND "," 
CONTROL-TASTE UND "." 


RO ge no 2 no mo zo 
na PBoan-— 


FLASHOFF 
SHIFTSPACE UNSICHTBARER CODE SHIFT-TASTE UND SPACE 
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Der 
Checksummer 
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' Der Checksummer OV 2.0 

Obwohl schon durch die alte 
Checksummer-Version OV1.0 
das Eingeben von Listings erheb- 
lich, vereinfacht. wurde, gab es 
immer noch kleine Mängel in der 
Bedienung. Insbesondere die Tat- 
sache, daß Listings in einem 
”Stück” eingegeben werden 
mußten, wirkte sich sehr nachtei- 
lig aus. Programme die am Vor- 
tag begonnen wurden, mußten 
später ohne Checksummer ver- 


vollständig werden. Lediglich die 


Besitzer eines Floppy-Laufwerkes 
kannten diese Probleme nicht. 
Ein weiterer Nachteil trat beim 
nachträglichen Editieren von 
‚Programmzeilen auf, welche län- 


ger als 40 Zeichen waren. 

Alle diese Nachteile sind in der 
Version OV2.0 nicht mehr vor- 
handen. Jetzt können Pro- 
gramme, welche bereits einge- 
geben wurden, nachträglich mit 
dem Checksummer kontrolliert 
werden. Um dies zu bewerkstel- 
ligen lädt man zuerst den Check- 
summer von Kassette bzw. 
Diskette, startet ihn mit RUN und 
lädt das zu prüfende Basicpro- 
gramm nach. Jetzt wird der 
Checksummer mit SYS 4097 ak- 
tiviert. Um eine Zeile zu überprü- 
fen, fährt man mit dem Cursor 
auf diese und betätigt die 
RETURN-Taste. Danach ver- 
gleicht man die Checksumme am 
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linken oberen Bildschirmrand mit 
der abgedruckten Checksumme 
im Heft. Stimmen diese Summen 
nicht überein, so ist die eing 
bene Zeile fehlerhaft und sollte 
korregiert werden. Beachten Sie 
bitte, daß die Checksummen der 
Version OV2.0 mit der Version 
OV1.0 identisch sind, diese jedoch 
jetzt formatiert (mit führenden 
Nullen) ausgegeben werden. Das 
bedeutet die Checksumme 

008 entspricht der Check- 
summe 8, 


Die Arbeitsweise und Funktion 
des Checksummers ist bis auf die 
erwähnten Merkmale identisch 
geblieben. Da der Checksummer 
jedoch in einem anderen Bereich 
liegt (4097 bis 4287) ändert sich 
der Basicanfang sowie die 
Checksummer-Startadresse. Die 
neue Startadresse lauter nun SYS 
4097. Vor einem LOAD bzw. 
SAVE Befehl sollte der Check- 
summer jedoch weiterhin mit SYS 





werden, 

Da der Checksummer den Basic- 
anfang versetzt, stehen dem An- 
wender 255 Bytes weniger Spei- 
cher zu Verfügung. In der Regel 
macht sich dies jedoch nicht nach- 
teilig bemerkbar, da selten der ge- 
samte Speicher benötigt wird. 
Sollte dies jedoch einmal vor- 
kommen, so sollte man das Pro- 
gramm nach der Eingabe mittels 
Checksummer abspeichern, da- 
nach den RESET-Taster betätigen 
und das Programm wieder einla- 
den. Jetzt kann das Programm 
ohne Probleme gestartet werden. 


Achtung! 
Wenn Sie den Checksummer ein- 
gegeben haben, so sollten Sie die- 
sen unbedingt vor einem Start 
abspeichern, da er sich automa- 
tisch löscht. Um den Checksum- 
mer möglichst fehlerfrei eingeben 
„ zu können, sollten Sie den alten 
Checksummer benutzen, 



































1 REM ER EEEEERENENEREN <a> 

2 REM # 63 <x99> 
5 REM * C16& CHECKSUMMER 0OV 2.0 * <120> 
4 REM *# * <181> 
5 REM * COPYRIGHT BY FRANK BRALL“ * <182> 
& REM # * <1903> 
7REM # (C) 15.12.86 TRONIC VERLAG * <116> 
8 REM * * <105> 
9 REN RRRRRRRHHRIARIHRIIIHIIHIIHIIHIIHHESIEHENE <12> 
10 DIM H(75) <115> 
2@ PRINT"(CLEAR DOHN SPACE}**#tSPACEICHECKSU 
MMER{SPACEIOV{SPACE}I2. DISPACEI###CSPACE}CIE/ 
PLUS/4" 2 <127> 
S®B PRINT" {SPACES}Y (C) {SPACEIFRANKTSPACEIBRALL 
tSPACE}1987 {SPACEY/{SPACEISONTRA" <356> 
48 PRINT ; <193> 
5® PRINT"CHECKSUMMER{SPACEFEIN{SPACEI=LSPACE 
ISYS{SPACEIA4NIT". <203> 
68 PRINT"CHECKSUMMER {SPACE}AUSTSPACEI=TSPACE 
+SYS{SPACEI62158:SYSTSPACEIZZQA4T" <236> 
78 PRINT:PRINT" {SPACE3SFACHTUNG {SPACE} ! {SPACE 
3VOR{SPACEYDEM{SPACEHLADEN{SPACE}ODER" <145> 
88 PRINT" {SPACE3}SPEICHERN{SPACE}VON{SPACEIP 
ROGRAMMENTSPACE}IST{SPACE}IDER" <181> 
98 PRINT" {SPACE3ICHECKSUMMER {SPACEIAUSZUSCHA 
LTEN{SPACE} !" a <16B> 
188 PRINT:PRINTYBITTE{SPACEIBEACHTEN{SPALEIS 
IE{SPACEFAUCHTSPACEIDIESPACEHHINWEISE" <12> 
110 PRINT" IN{SPACEIDEN{SPACEIHEFTEN{SPACEICO 
MPUTE{SPACE}YMIT , {SPACEITCOMPUTRONIC" x252> 
128 PRINT"SOWIEXSPACEIDEN{SPACEIAKTUELLEN{SP 
ACE3SONDERHEFTENtSPACEY! " <141> 
158 PRINT"DIESER{SPACE}CHECKSUMMER SPACEHIST 
tSPACEYVOLL {SPACEFKOMPATIBEL" <B&a> 
140 PRINT" ZUR{SPACEIVERSION{SPACEI1.B, {SPACE 
3ERLAUBTTSPACEI JEDOCH" <49> 
158 PRINT" ZUSAETZLICHTSPACEIDASTSPACEINACHLA 
DEN{SPACE}VON{SPALE}PROGRAMMEN" <55> 
199 PRINT: PRINT <159> 


200_PRINT"HABEN{SPACEISIETSPACEIDENCSPACEICH 
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62158:SYS 33047 abgeschaltet Frank Brall 
ECKSUMMER {SPACE}GESPEICHERT{SPACEI?" <236> 
210 GET E$:IF Es="" THEN 210 <B> - 
228 IF E$="N" THEN PRINT"DANN{SPACEISAVEN{SP 
ACEYSIETSPACE}I IHN{SPACEIJETZTISPACE}!":STOP <42> 
122 PRINT"BITTEXSPACEIWARTEN{SPACE} !" <55> 
6EBAD FORI=BTOF <189> 
6QR1B H(48+1)=I:lit65+1)=I+1Q: NEXT <1a5> 
60822 FORI= 4997 TO 4287 :READA$ <1B1> 
6BB3B H=ASC(LEFTS(AS,1)) <234> 
62B4B L=ASC(RIGHTS(A$,1)) <253> 
sa05Q D=H(H)*16+H(L):S=S+D:POKEI,D <13> 
6BWED A=A+1: IFA<ZBTHENNEXT:A=-1 <97> 
62070 READV: Z=Z+1: IFV=STHENGQBBS <177> 
6BQ8B PRINT"DATAFEHLER {SPACE} INTSPACEIZEILEL 
SPACE}: "; 6Q2B@+Z: END <39> 
6BRB5 IFA<BTHENSBIOB <116> 
62297Q S=B: A=B: NEXT <246> 
6Q1BR PRINT" CLEAR}POKETSPACE}44,17:POKEISPA 
CE}17%*256 ,0: NEW: " <50> 
62110 PRINT" (DOWNZYCHECKSUMMERTSPACEIISTISPA 
CEIEINGELESEN{SPACE} !" <208> 
60120 PRINT" {DOWN>START{SPACEIMIT: {SPACE2ISY 
S{SPACEIAQ97" <a7> 
60135Q POKE 239,2:POKE 1319,19: POKE 1328,13:E 

ND <198> 
60281 DATA A9,2C,8D,22,023,A9,10,80,903,03,68, 
A2,FF,86,3A,20,54,88,86,3B, 1815 <252> 
68202 DATA 84,30,20,73,84,AA,FQ,EF,90,09,20, 
53,89,20,79,04,4C,D9,8B,2@, 2018 <28> 
60203 DATA SE,8E,20,53,89,84,0B,A9,00,8D,BB, 
10,8D,BC,190,8D,ED,190,18,A5, 1992 <255> 
60204 DATA 14,65,15,8D,BD,1@,AB,FF,C8,Bi1,3B, 
F®,2C,C9,22,DQ,0A,AD,BB,1@, 2452 <13> 
682085 DATA 49,21,8D,BB,18,B1,3B,AE,BB,1@,DO, 
04,C9,20,F@,E4,EE,BC,18,AE, 2568 <205> 
60286& DATA BC,19,18,B1,3B,4D,BD,1@,8D,BD,10, 
CA,DB,F4,4C,45,190,A9,BC,8D, 2437 <180> 
60297 DATA 9B,2C,A7,BE,8D,04,0C0,A9,00,AE,BD, 
10,85,62,86,63,42,98,38,20, 1934 _ <103> 
60208 DATA CE,A2,28,71,A4,20,74,9B,28,4E,9C, 
A2,03,AB,88,20,80,24,09,80, 2064 <117> 
68207 DATA 9D,20,2C,CA,88,10,F4,A9,BQ,E0,0B, 
FQ,06,9D,09,2C,CA,D@,FA,86, 2545 22702875 
60218 DATA FF,4C,36,87,00,02,02,00,02,FF,CD, 

988 <75> 


ENDE DES LISTINGS 
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Der Checksummer für MC- Programme! 


Maschinenprogramme gefragt? 


Da wir verstärkt Maschinenpro- 
gramme abgedrucken, benötigen 
Sie ein Verfahren, um auch diese 
Programme mit einer Check- 
summe zu versehen. Das Aus- 
druckverfahren von Basic-Listings 
wird nicht verändert. Hier wird 
auch weiterhin der erprobte 
Checksummer OV 2.0 seine 
Dienste tun. 


Der Checksummer OVM 1.0 


Wie schon erwähnt, dient der 
Checksummer ausschließlich zum 
Eingeben von Maschinenpro- 
grammen, Diese konnten zwar 
bisher relativ kompakt als soge- 
nanntes HEXDUMP ausgegeben 
werden, ließen jedoch keine Mög- 
lichkeit für eine oder mehrere 
Prüfsummen offen. 

Dies ist bei diesem Checksum- 
mer völlig anders. Die Bedienung 
und Arbeitsweise dieser Version 
ist weitgehend mit dem eingebau- 
ten Maschinensprachemonitor 
TEDMON identisch. Die einzige 
Ausnahme ist, daß nach der Ein- 
gabe einer HEXZEILE keine 
ASCII-Zeichen, sondern eine soge- 
nannte Checksumme bzw. Prüf- 
ziffer ausgegeben wird. Achter 
man beim Eingeben der Zeilen 
darauf, daß Diese Prüfziffern mit 
den abgedruckten Prüfziffern 
identisch sind, so kann praktisch 
kein Tippfehler mehr übersehen 


werden. 


Hinweise zum Einsatz des 
Checksummers 


Um den Checksummer OVM 1.0 
einzugeben, sollten Sie unbedingt 
den Basic-Checksummer OV 2.0 
verwenden. Vor dem Start, durch 
den Befehl RUN, sollte das Pro- 
gramm auf jeden Fall mit 
SAVE”OVM1.0” auf Kassette oder 
Diskette abgespeichert werden, da 
sich das Programm unter Um- 
ständen selbst zerstören kann. 


Wer sich die Arbeit des Eingebens 
völligeersparen möchte, kann den 
Checksummer auch unter den 
folgenden Bestellnummern bezie- 
hen; 


C16-SA 4/88 


OVM 1.0K Kassette 
OVM 1.0 D Diskette 


15 DM 
20 DM 


Nachdem man den Checksum- 
mer eingegeben und mit RUN ge- 
startet hat, verlangt dieser die 
Eingabe einer Adresse. Diese 
Adresse gibt an, ab welcher Spei- 
cherstelle der Checksummer im 
RAM abgelegt werden soll. Diese 
Adresse muß flexibel gestaltet 
werden, da sich sonst einzuge- 
bende Maschinenprogramme 
eventuell mit dem Checksummer 
überschneiden könnten. Der 
zweite Vorteil ist, daß sich ein 
verschiebbarer Checksummer 
gleichermaßen für den C16 so- 
wie den Plus 4 eignet. Zu beach- 
ten ist hier nur, daß sich die 
eingegebene Adresse in einem zu- 
lässigen Bereich befindet: Beim 
C16 von 4097 bis maximal 12680 
Beim Plus 4 von 4097 bis maxi- 
mal 32060. 


Welche Adresse man schließlich 
wählt, bleibt jedem selbst überlas- 
sen. Wichtig ist nur, daß der Be- 
reich 688 Bytes über der Adresse 
nicht vom einzugebenden Pro- 
gramm benötigt wird. Belegt 
beispielsweise das einzugebende 
Programm den Bereich von 
-1000--2000 (4096-8192), so 
könnte man für den Checksum- 
mer die Adresse 9000 wählen. Um 
Ihnen am Anfang die Wahl des 
Speicherbereiches etwas zu er- 
leichtern, werden wir auch ent- 
sprechende Tips in den 
Programmbeschreibungen unter- 
bringen. 


Nachdem Sie eine Stärtadresse 
eingegeben und die RETURN- 
Taste betätigt haben, wird der 
Bildschirm mit einem undefinier- 
baren Zeichengewirr beschrieben. 
Keine Angst, dies ist normal und 
dient zum Umrechnen einiger 
Sprungbefehle. Kurz danach er- 
scheint die eingegeben Starta- 
dresse sowie die Endadresse des 
Checksummers. Prüfen Sie jetzt 
noch einmal genau, ob sich diese 
Adressen nicht mit dem einzuge- 
benden MC-.Programm über- 
schneiden. 


Ist dies nicht der Fall. so kann der 


Checksummer mit dem angezeig- 
ten SYS ... Befehl aktiviert wer- 
den. Ein ab Adresse 10000 
abgelegter Checksummer wird 
beispielsweise auch mit SYS 10000 
aktiviert. 


Nachdem sich der Checksummer 
mit dem üblichen COPY-RIGHT- 
Vermerk melder, befinden Sie sich 
im MC-Eingabemodus. Dies be- 
deuter, daß jetzt die Basic-Befehle 
nicht mehr ausgeführt werden 
können. Statt dessen stehen dem 
Anwender nun acht neue Befehle 
zur Verfügung. Die Befehle beste- 
hen jetzt nur noch aus einem ein- 
zigen Buchstaben und arbeiten 
ähnlich wie die im eingebauten 
Maschinensprachmonitor 
TEDMON. 


M aaaa,eeee 

Dies ist der sogenannte 
Memory-Befehl. Er erlaubt das 
Auflisten eines bestimmten Spei- 
cherbereichs als HEXDUMP mit 
einer Checksumme pro Zeile. Die 
Parameter aaaa und eeee stehen 
jeweils für Anfangs- und Enda- 
dresse des auszugebenden Be- 
reichs. 


aaa bb bb ... 
Dieses ist der eigentliche 
Maschinencode-Eingabebefehl. 


Als Parameter kann die Eingabe- 
adresse sowie eine Folge von By- 


tes (maximal- 8) übergeben 


werden. Die Arbeitsweise ist mit 
dem herkömmlichen Monitor 
völlig identisch und kann im 
Handbuch zum C16 genauer stu- 
diert werden. Der einzige Unter- 
schied zum Standard-TEDMON- 
Befehl besteht darin, daß nach dem 
Betätigen der RETURN-Taste am 
Zeilenende eine Checksumme er- 
scheint. Um’ die Checksumme 
besser von den Bytes der Eingabe 
abzuheben, ist diese durch zwei 
Doppelpunkte von letzteren ab- 
gesondert. Da dieser Befehl auto- 
matisch beim M-Befehl den Zeilen 


'vorangestellt wird, lassen sich 


Speicherbereiche einfach mittels 
der Cursortasten verändern oder 
verbessern. Wichtig ist hier aller- 
dings, jede veränderte Zeile mit 
der RETURN-Taste zu quitieren. 


Dich diesen Befehl wird die 
Bildschirmausgabe auf einen an- 
geschlossenen Drucker umgelei- 
ter. Wenn Sie anschließend den 
M-Befehl benutzen, können Sie 
beliebige Speicherbereiche als 
HEXDUMP mit Prüfsummen auf 
Ihrem Drucker’ ausgeben lassen. 


B 

Dieser Befehl stellt das Gegen- 
stück zum P-Befehl dar. Die Aus- 
gabe wird wieder auf den 
Bildschirm umgeleitet. 


L”Name”,g 

Dies ist der LOAD-Befehl zum 
Nachladen von Maschinenpro- 
grammen. Die Syntax und Ar- 
beitsweise entspricht genau dem 
TEDMON-Befehl und kann so- 
mit im Handbuch nachgelesen 
werden. 


S”Name’,‚g,aaaa,eeee 

Dies ist der Save-Befehl zum Spei- 
chern von Maschinenprogram- 
men. Die Syntax und Arbeits- 
weise entspricht genau dem 
TEDMON-Befehl und kann so- 
mit im Handbuch nachgelesen 
werden. 


V”’Name”;,g 

Dies ist der VERIFY-Befehl zum 
Prüfen von Maschinenprogram- 
men. Die Syntax und Ar- 
beitsweise entspricht genau dem 
TEDMON-Befehl und kann so- 
mit im Handbuch nachgelesen 
werden. 


X 

Über diesen Befehl verlassen Sie 
den Eingabemonitor und gelan- 
gen wieder in den Basic-Interpreter 
zurück. 


Achtung ! 

Nach der Ausführung der Befehle 
L,S und V (LOAD, SAVE VERI- 
FY), befinden Sie sich nicht mehr 
im Checksummer, sondern im 
eingebauten Systemmonitor TED- 
MON. Um den Checksummer 
wieder zu aktivieren, müssen Sie 
diesen von TEDMON mit Gxxxx 
(xxxx steht für Startadresse in 
HEX) oder vom Basic aus, wieder 
mit SYS ... aktivieren. 
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So, nun viel Glück beim Einge- 
ben von Maschinenprogram- 
men. Übrigens, wer noch nicht 
ganz mit der Bedienung unse- 


res Systems zurechtkommt, 
kann selbstverständlich auch 
weiterhin den eingebauten 
TEDMON benutzen, Wir hoffen 


jedoch, daß unser System OVM 
1.0 Ihren Zuspruch finden und die 
lästige Fehlersuche zumindest 
stark reduzieren wird. Schreiben 


418 DATA2398,32,12,239,32,216,251,13,66,73,76 


Sie uns doch einmal, was Sie von 
unseren Eingabehilfen für gut 
oder für verbesserungswürdig 
halten! Frank Brall 


C-1& LISTING + CHECKSUMMEN (0C v1. 


128 REM HH 
2B REM MC-EINGABERDOUTINE 
3@REM ._  ODvMı1.a 

“AB’REM "' (C) FRANK BRALL 
NEBHREM HH 

&8 REM 

790 FOR I=16538 TO 17@2:READ PıPOKE I,PsNEXT I 
88 REM ### VERSCHIEBE ROUTINE ##*# 

98 DATAS2,222,157,132,216,133,217,32,222,157 
„1408,134,3,141,135,3,32,222 

198 DATA157,132,218,133,219,168,0,177,216,14 
5,218,24,165,216,1905,1,133,21& 

118 DATA165,217,105,0,133,217,24,165,218, 185 
„1,133,218,165,219,185,8,133 

128 DATA219,165,217,205,135,3,228,219,165,21 
6,205,134,3,208,212,964,2,8 

159 DATA@ 

148 REM ### MC-CODE #*#%# 

150 DATA234 ,169,251,141,21,255,169,2,141,25, 
255,32,216,251,147,17,29,144 

168 DATAS2,32,67,49,54,32,77,67,45,67,72,69, 
67 ,75,83,85,77,77 

178 DATA69,82,32,79,86,77,32,49,48,13,13,32, 
32,32,32,32,40,67 

188 DATA41,32,70,82,465,78,75,32,66,82,65,76, 
76,32,49,57,56,55 5 

198 DATA17,0,32,58,251,162,0,134,243,32,297, 
255,157,8,2,232,2@1,13 

200 DATA2988,245,202,134 ,244,32,63,251 „248,23 
9,281 ,32,249,247,162,7,221,151 

218 DATA18,2498,9,202,16,248,32,11,251,56,176 
‚219,234 ,224,5,240,29,224 

220 DATA6,240,25,224,7,248,21,138,198,178,189 
‚168,18,141,173,18,189,159 

238 DATA18,141,172,19,32,242,17,108,172,18,1 
41,91,5,169,241,141,21,255 

248 DATA169,238,141,25,255,173,71,5,76,118,2 
46,176,19,32,91,251,160,8 

258 DATA32,242,17,176,9,165,241,145,161,208, 
192,8,144,242,32,216,251,27 

258 DATA79,145,0,32,67,18,56,176,166,234,8,1 
65,161,141,174,18,165,162 

270 DATA141,175,18,32,216,251,13,32,77,67,45 
»‚76,73,83,84,73,78,71 

288 DATAS2,77,73,84,32,67,72,69,67,75,83,85, 
77,77,69,78,32,79 

290 DATA86,77,49,48,13,8,173,174,18,133, 161, 
173,175,18,133,162,40,176& 

3908 DATA14,56,176,3,56,176,183,32,91,251,32, 
242,17,144,6,169,11,133 

318 DATA241 ,208,14,32,100,251,74,1@2,241,74, 
1902,241,74,102,241,133,242,32 

328 DATA225,255,249,13,32,67,18,169,8,32,158 
,251,32,114,251,176,238,8 2 

350 DATA165,161,141,174,109,165,162,141,175,1 
8,32,216,251,13,32,69,78,6B 

348 DATA69,32,68,69,83,32,76,73,83,84,73,78, 
71,83,32,498,79,8& 

358 DATA77,41,13,0,173,174,18,133,161,173,17 
5,18,133,162,498,56,176,152 

348 DATNS2,216,251,13,77,67,45,67,72,69,67,7 
5,93,85,77,77,69,82 

378 DATAS2,65,85,93,32,33,0,167,241,141,21,2 
55,1649,238,141,25,255,194 

388 DATA104,76,3,128,234,32,216,251,13,60,82 
,85,67,75,69,82,32,65 - 

390 DATA75,84,73,86,13,8,169,1,162,4,1698,8,3 
2,186,255,169,8,32 

4098 DATA189,255,32,192,255,162,1,32,201 ,255, 
56,176,1688,234,169,1,32,93 
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<241> 
<252> 
<218> 
<194> 
<25> 
<203> 
<248> 
<238> 
<145> 
<54> 
<136> 
<198> 
<1901> 
<199> 
<74> 
<215> 
<89> 
<255> 
<218> 
<32> 
<B7> 
<78> 
<124)> 
<58> 
<173> 
<1&B> 
<1&2> 
<232> 
<59> 
<29> 
<238> 
<70> 
<65> 
<118> 
<138> 
<158> 
x135> 
<119> 
<196> 


<224> 





























ENDE DES LISTINGS 


‚68,83,67,72,73,82,77 <171> 
420 DATA32,65,75,84,73,86,13,0,56,176,219,16 
9,0,133,241,133,242,141 <10> 
438 DATA244,7,32,63,251,240,58,201,32,240,24 
7,201,32,240,46,201,44,240 <107> 
440 DATA42,201,48,144,43,291,71,176,39,201,5 
8,144,6,201,65,144,31,233 <90> 
458 DATAB,233,47,10,10,10,10,162,4,10,38,241 
‚38,242,202,208,248,238 <251> 
468 DATA244,7,32,63,251,208,206,173,244,7,24 
,76,104,104,32,11,251,56 <53> 
478 DATA176,172,234,32,58,251,169,62,32,218, > 
255,32,251,250,160,0,32,158 <249> 
488 DATA227,32,5,251,208,192,8,144,245,32,21 
6,251,58,58,8,169,8,141 <105> 
498 DATA169,18,160,0,32,150,207,141,171,18,1 
40,17@,18,174,179,18,232,24 <139> 
528 DATA173,171,18,169,169,18,141,169,18,202 
‚208,243,20@,192,8,144,225,24 <137> 
518 DATA173,169,18,191,161,24,1@01,162,162,0, 
32,5,251,96,62,77,88,88 <221> 
520 DATA&6,76,83,86,174,16,288,16,123,17,163 
‚17,208,17,8,0,8,8 <206> 
538 DATAB,@,8,255 <234> 
548 REM <173> 
558 REM ### ABSOLUTE ADRESSEN ##* <2B> 
S6Q REM <193> 
578 DATA’ 4294 „4234 ,4237 ,4240,4243 <259> 
580 DATA 4246,4249,4278,4299,4309 <a> 
590 DATA 4314,4356,4361,4378,4408 <B6> 
&0Q DATA 44244429 ,4462,4447 ,4709 <215> 
61@ DATA 4717,4720,4723,4728,4731 <A7> 
620 DATA 4734 ,4746,4767,4769 ,4771 <188> 
638 DATA 4773,4775,8 <52> 
640 PRINT"{CLEAR DOHN2 SPACE3IMASCHINENCODET 
SPACEYCHECKSUMMER{SPALEIDVMLSPACEI 10" <47> 
658 PRINT" {DOWN SPACET> (C) {SPACEIFRANKCSPACE 
3BRALL{SPACE? 1987 {DOUN} " <3Q> 
668 PRINT"BITTE{SPACEIBEBEN{SPACEISIELSPACEI 
NUN{SPACEIDIESPACEIADRESSE{SPACEIEIN,” <136> 
678 PRINT"AB(SPACEIDERLSPACEIDERTSPACEICHECK . 
SUMMERTSPACEF IM{SPACEFSPEICHER" <51> 
688 PRINT"ABGELEGT (SPACE}WERDEN{SPACEISOLLTS. 

PACE} !" <228> 
692 PRINT" {DOHNFACHTUNGLSPACEI ! ! ! CDDUNF" <197> 
708 PRINT"BEIM{SPACEIC1GCSPACEIZWISCHEN{SPAC 
EI4B97SPACEFUNDSPACE} 1 ZUBDLSPACEN ı" <64> 
718 PRINT"BEIM{SPACEIPLUS4 SPACE) ZWISCHENTSP 
ACEI4B97 (SPACEIUNDTSPACEISZMEMTSPACEI ! CDOUNY 4 
" <215> 
72@ INPUT "ADRESSE{SPACEI "AD <111> 
73@ IF AD<4877 THEN RUN <47> 
749 IF AD>3286® THEN RUN <210> 
75@ D=AD-4897:REM DIFFERENZ <171> 
760 PRINT" {CLEARIBITTELSPACEIEINENTSPACEFAUB 
ENBLICKTSPACEIWARTENTSPACEN ! ” <167> 
778 FOR I= 3152 TO 3152+487 :READ P:POKE 1,P 

ıNEXT I <203> 
788 READ UA :IF UA = @ THEN 850 <129> 
798 UA=UA-9745 <173> 
808 W=(PEEK (UA+1) #256) +PEEK (UA) <104> 
-818 W=W+D <233> 
82@ POKE UA+1, INT (01/256) <139> 
838 POKE UA,W- (INT (W/256) #256) <13> 
840 GOTO 738 <170> 
85@ PRINT" {HOME SPACESIPROBRAMMISPACEIISTISP 
ACEIEINGELESENTSPACE} !" <135> 
860 PRINT" {DOWN19ISTARTLSPALEIMITSPACEISVS" 

AD <246> 
878 PRINT"START{SPACEIBEIS "AD" CSPACEZIENDELS 
PACE}IBEI: "AD+687 <166> 
EBEN SYS 1639,3152,3152+688,AD <27> 
892 END <253> 
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Zuviel Speicherplatz? 
Inder Ausgabe 5/88 haben Sie 
ein Listing veröffentlicht, durch 
das die Erweiterung abgeschal- 


tetwerden kann. Eine noch ein- - 


fachere Methode ist die Ein- 
gabe von: 
POKE1331,246:POKE1332,63- 
ıSYS32768 

Nach dem Drücken der 
Return-Taste haben wir die 
Einschaltmeldung des nicht 
erweiterten C16. Mit Reset sind 
wir wieder im erweiterten C16. 
Dies dürfte insbesondere für 
Datasettenbenutzer interessant 
sein. 


Ihr Computerfreak ° 


= Peter Köcher 
Red. 
Die einfache Methode von Peter Kö- 
cher bewirkt die gleiche Umschal- 
tung wie das Programm. Nur wer 
es vorzieht, menuegesteuert zu ar- 
beiten, ist besser mit dem Pro- 
gramm bedient. 


Einsteighilfe 
Heute habe ich das neue Son- 
derheft 3/88 gekauft und 


möchte meinen Beitrag zur 


Rubrik ‘'Report‘ abgeben. Unter 
der Überschrift *Einsteiger‘ 
stellte H.J. Heienbrok dar, daß 
er mit dem dort genannten Ko- 
pierprogramm aus der Aus- 
gabe 2/88 das Programm Da- 
teimanager von M&T nicht ko- 
pieren kann. Man schafft es auf 
allen möglichen Wegen! Ich 
habe mit den zur Verfügung 
stehenden Basic-Befehlen Er- 
folg gehabt. Man muß alle drei 
Programmteile einzeln laden 
und:auch einzeln auf Disk ab- 


speichern. Dann braucht man 


das erste Programm nur noch 
zu starten, und die zwei ande- 


ren Teile laden sich: automa- 


tisch nach. Wenn der 0.9. es 


“nicht schaffen sollte, so kann er 


sich an mich wenden (Tel. 


C16-SA 4/88 


. cator. 


02683/6300). 
Nun etwas zu Ihnen, liebe Re- 
daktion! Ihr bessert Euch mit 
der Zeit. Die Beiträge für die 
Anwender gefallen mir gut. Je- 
doch laßt bitte diese Comics 
(Lückenfüller) weg! Es würde 
mich sehr freuen, wenn Ihr 
mehr Hardwareartikel vor- 
schlagen bzw. testen würdet. 
Christoph Demuth 
Red. 
Zunächst einmal vielen Dank für 
die Hilfestellung! Bereits in dieser 
Sonderausgabe werden Sie feststel- 
len, ähnlich wie in der Compute 
mit selbst ab Heft 6/88, daß die 
Comics sehr stark ‚reduziert wur- 
den. Um die Vorstellungen neuer 
Hardware werden wir uns auch 
weiterhin bemühen. Allerdings gibt 
es zur Zeit nur sehr wenig auf dem 
Markt. 


Disk Duplicator 

In der letzten Ausgabe druck- 
ten Sie das Listing Disk Dupli- 
Obwohl dieses Pro- 
gramm für die Floppy 1551 ge- 
schrieben wurde, tippte ich es 
ab und probierte es an einer 
Floppy 1570 und 1541, doch 
ohne Erfolg. Nach langem Stu- 
dieren und Ausprobieren des 
MC-Programms habe ich das 
Problem erkannt. Beim Aus- 
schalten wie auch beim 
Schreiben wird vor der Um- 
schaltung auf RAM das 
Interrupt-Flag gesetzt und nach 
der Rückschaltung auf ROM 
wieder gelöscht. Aber genau 
diese Zeitspanne, während der 
Interrupt gesperrt ist, ist für se- 


« riell: angeschlossene Floppys 


zu lang. Ich-habe nun durch 
meine Änderungen diese 
Zeitspanne verkürzt, und. nun 


laufen auch alle Floppys mitse- 


rieller Schnittstelle problemlos. 
1. _ Zuerst Original-MC-Pro- 
gramm laden. 2. Monitor:ein- 
schalten und den Verschiebe- 


Befehl eingeben: T 1560 16A4 
155F 3. Folgende Speicherstel- 
len ändern: 1533: 5F 1536:-80 
1539: AF 153C: 01 1547: A5 
154B:38 154E: 5D 155C:A5 4. 
Ab Speicherstelle 15E6 einge- 
ben: 15E6: A2 05 20 C6 FF AO 
00 20 15EE: CF FF 78 5. Ab 
Speicherstelle 15F9: 15F9: 58 
C8 DO F020 CC FF 6. Ab Spei- 
cherstelle 1691: 1691: A2 0520 
C9 FF AO 00 78 7. Ab Spei- 
cherstelle 16A1: 16A1: 58 20 
D2 FFC8 DO FO 
So, das war's. Jetzt noch ab- 
speichern mit :S’DISK DUPLI- 
CATE 2',8,1500,1808. Ich 
hoffe, hiermit allen Besitzern 
einer Floppy mit serieller 
Schnittstelle einen kleinen 
Dienst erwiesen zu haben. 
Karl Matzutt 
‚Red, 
Nicht nur die Leser sind Ihnen 
dankbar, sondern auch wir. Ihre 
Änderung ist sehr hilfreich. 


Die Mädel kommen! 
Ich bin 21 J., weiblich, ein 
großer Computerfreak und seit 
zwei Jahren Leserin Eurer gu- 
ten Zeitschrift. In den zwei Jah- 
ren bin ich immer bestens mit 
Eurem Heft zurechtgekommen. 
In der neuen Ausgabe fand ich 
es spitze, daß sich endlich 
auch mal ein Mädchen gemel- 
det hat. Wie wäre es denn mit 
einem weiblichen Computer- 
Club? Wenn Ihr erst einmal ei- 
nen Computer besitzt, werdet 
Ihr schon sehen, wieviel Spaß 
man daran haben kann. 

© Silke Kuznicki 
Red. esse, 
Vor einer Geschlechtsumwandlung, 
nur um in Silkes neuen Club auf- 
genommen zu werden, raten. wir 
dringend ab. Alle ernsthaft inter- 


essierten Computerdamen bitten 


wir hingegen, sich an Silke Kuz- 


zu wenden. .„(Zelefon 
02323/35084) Wir- drückensdie 
Daumen, daß Ihr einen Club auf 
die Beine bringt! 


nicki 


Compute 16-bit 
Compute mit ist ohne Zweifel 
die beste C-16 Zeitschrift auf 
dem Markt. Die Spiele sind 
recht gut, die Anwendungen 
non plus ultra. Dennoch gibt es 
auch Mängel. Ich weiß ja nicht, 
wie es bei Euch mit Tests ab- 
läuft, aber ich bin sicher, es 
gibt solche und solche Tesis. 
Da war zum Beispiel ACE, eine 
super Kritik und ein super 
Spiel. Dann aber die "Legende 
vom Eis’ eine riesige Kritik und 
ein Scheißspiel ("schuldigung). 
Das solche Nieten ab und zu 
mal darunter sind, weiß ich 
auch von Freunden. ...Das soll 
aber keineswegs Eure super 
Hard-_ und Softwaretests 
schmälern. 

Und nun zu ein paar Fragen: 
Habt Ihr. vor auf 16-biter umzu- 


- steigen? Wie wär's mit einem _ 


Turbo-Disk für meine (und na- 
türlich auch andere) 1541? 
Man könnte das Turbo-Disk 
aus Compute mit 1/87 
adaptieren.... 

Giovanni Wagner 
Red. 
Unsere Spieletests sollen der Leser- 
schaft helfen, die lohnenswertesten 
aus einer Unmenge mittelmäßiger 
Spiele auszusortieren, um nicht un- 
nütz Geld auszugeben. Daß der Te- 
ster eines Spiels, anders als bei An- 
wendungssoftware oder Hardware, 
nicht immer den Geschmack jedes 
Lesers trifft und sich die Kritik 
unterscheiden kann,.ist unvermeid- 
bar. Allerdings sind wir bemüht, 
solches zu vermeiden. 
Zu den Fragen: Wir beabsichtigen 
nicht, auf die 16-Biter umzusteigen. 
Die Besitzer von C-16, C:64-und 
Schneider CPCs brauchen sich da- 
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‚her.keine. Sorgen zu machen. Eine 
Turbo-Disk für 1541 ist in Planung. 
(Weitere Fragen beantwortet Ihnen 
gerne der Hotline Servic.) 


Preisgünstig 
Ich habe seit zwei Jahren ein 
Abonnement Eurer Zeitschrift 
Compute mit und war auch 
immer sehr zufrieden damit. Da 
jedoch mein Computer vor kur- 
zer Zeit seinen Geist aufgege- 
ben hat, habe ich mir einen 
Amiga angeschafft. Doch für 
diesen gibt es ja leider keine 
Beiträge in Eurer Zeitschrift. 
Ich bedaure das, denn Eure 
Zeitschrift ist sehr informativ 
und vor allen Dingen preiswert, 
was man von den meisten an- 
deren Computer-Magazinen 
nicht sagen kann... 

Martin Hasse 
‚Red. 
Nach wie vor bieten die Systeme 
von Commodore und Schneider, 
die im Vordergrund unserer Zeit- 
schrift stehen, eine Menge Möglich- 
keiten, und ein riesiges Angebot an 
Software steht für die Systeme be- 
reit. Ein neues System wie den 
Amiga hinzuzunehmen, ginge auf 
Kosten: der vorhandenen und da- 
mit auch auf Kosten unserer Leser. 
In näherer Zukunft beabsichtigen 


wir daher nicht, den Amiga mit ins: 


Programm zu nehmen. 


Hitzetod 

Zum Thema Hitzetod habe ich 
folgende Bemerkung zu ma- 
chen. Das schwächste Glied im 
Netzteil des C16 ist der Gleich- 
richter. Wenn man diesen 
durch vier Dioden (2A) ersetzt, 
so hat man eine kostengün- 
stige Lösung des Problems. 
Die Wärme des Trafos verur- 
sacht keine Schäden. Auch der 
Spannungsregler im C-16 lei- 
det nicht unter der zu hohen 
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Spannung. 

Zum Superbasic +4 (SA 1/88, 
S.33) senden Sie mir bitte eine 
ausführliche Beschreibung, da 


die Beschreibung im Heft sehr ° 


kurz ist. 

R. Böttcher 
Red. 
Neben dem Spannungsregler ist si- 
cherlich auch der Gleichrichter sehr 
empfindlich. Es empfiehlt sich da- 
her im Falle eines Falles, beide aus- 
zuwechseln. Aus Kostengründen 
kann es allerdings manchmal gün- 
stiger sein, gleich ein nenes Netzteil 
zu kaufen. 
Beim Superbasic +4 besitzen auch 
wir nur die Anleitung, die im Heft 
abgedruckt wurde. 


Textprogramm 

In Ihrer Zeitschrift Compute mit 
- Sonderheft 2/86 veröffentlich- 
ten Sie ein Textprogramm, 
welches jedoch für Besitzer ei- 
ner Diskettenstation nicht 
geeignet ist. Ich erlaube mir, 
Ihnen eine überarbeitete Ver- 
sion dieses Programms zu 
übersenden. Hiermit ist man 
nun in der Lage, einen Text 
unter einem beliebigen Namen 
auf Disk abzuspeichern. Wei- 
terhin habe ich eine Option 
zum Aufruf des Directorys mit 
eingebaut. Da es sich um ein 
recht schönes Textprogrammm 
handelt, würde ich mich freuen, 
wenn Sie diese Änderungen 
veröffentlichen. 

90 
COLOR0,7,7:COLOR4,7,7:C- 
OLOR1,1 

1131 PRINT”* = DIRECTORY” 
1132 GETKEYA$ 

1133 
IFA$ ="*"THENDIRECTORY- 
1134 PRINT:PRINT 

1135 INPUT”-ILENAME";C$ 
1136 SCNCLR 

1140 OPEN2,8,2,C$ +” ,S,W” 





1142 PRINT # 2,C$ 

1170 PRINT # 2,TX):NEXTX 

1180 PRINT # 2:CLOSE2: 

GOTO150 

1211 PRINT”* =DIRECTORY"” 

1212 GETKEYA$ 

1213 IFA$ ="*"THENDIREC- 

TORY 

1214 PRINT:PRINT 

1215 INPUT”-ILENAME”;C$ 

1216 SCNCLR 

1220 OPEN2,8,2,C$ +” ,S,R” 

1221 INPUT #2,C$ 

1230 INPUT #2,F 

1260 CLOSE2:GOTO150 
Gerhard Meyer 

Red. 

Das Textprogramm für den C- 

16/116 erhält durch Ihre Änderung 

eine entscheidende Verbesserung. 

Vielen Dank! Auch einige Leser 


. werden sich freuen. 


Kopieren mit Pfiff 

Seit einiger Zeit besitze ich ei- 
nen C-16 mit 64K Speicherer- 
weiterung sowie eine Floppy 
1551. Die Zeitschrift Compute 
mit sowie auch die Sonderhefte 
kaufe ich regelmäßig, da sie 
mir sehr gut gefallen. Als so- 
genannter Einsteiger habe ich 
bei der Eingabe von Spielpro- 
grammen dank der sehr guten 
Checksummer keine Schwie- 
rigkeiten. Jedoch tauchen bei 
den Anwendungsprogrammen 
manchmal Schwierigkeiten auf. 
So z.B. beidem "Kopiersystem 
mit Pfiff”. Bei zwei von meinen 
Mastertonic-Kassetten ist das 
Überspielen auf Diskette ge- 
lungen, jedoch bei anderen, 
mehrteiligen Programmen, die 
sich nachladen, gelang mir 
dies nicht. Habe ich etwas 
talsch gemacht, oder funktio- 
niert es bei diesem Programm 
nicht? -Könnten Sie nicht in 
Zukunft die Anwendungspro- 
gramme etwas einfacher und 
für Einsteiger verständlicher 


beschreiben? 
Rolf Kelke 


Red. 

Sie haben keinen Fehler gemacht. 
Das sehr gute Kopi amm 
(Sonderheft 2/88) eignet sich für die 
verschiedensten Kopierversuche. Bei 
Mastertronic-Kassetten, insbeson- 
dere wenn Teile nachgeladen wer- 
den müssen, können aber Probleme 
auftreten. In diesem Fall ist dieser 
Kopierer nicht der geeignete. Zu den 
Anleitungen der Anwendungspro- 


gramme: Wir bemühen uns, die _ 


Texte allgemeinverständlich zu 


formulieren. 


Programmautoren 

Mit Begeisterung habe ich 
mich auf das neue Sonderheft 
gestürzt. Am besten sind das 
"N.C.S” und das Adventure 
"Burg”. 

Mir sind auch gleich ein paar 
Ideen für Programme gekom- 
men, die Sie vielleicht an die 
Leser weiterleiten können: 1.) 
Einen Flipper (vielleicht mit 
Sounds aus Ihrem Sampler !?I 
2.) Eine leistungsstarke Text- 
verarbeitung (d.h. in Assembler 
programmiert)! 3.)Basi 7.0 Er- 
weiterung mit allen sinnvollen 
Befehlen des PC128! 4.) Ein 
Programm, das C-64 Pro- 
gramme (zumindest Pokes) auf 
den C-16 umschreibt! _ 

Und jetzt muß ich noch etwas 
schimpfen: Der "Kompressor" 


geht scheinbar nicht! Liegt das . 


daran, daß ich die Floppy 1551 
und einen alten C-16 (64K) 


. verwende? 
Zum Abschluß noch eine 
Frage: Kann man ° den 
Soundsampler auch fertig 
kaufen? 

Stefan Schulze 
Red. 
Zunächst vielen Dank für die gu- 


ten Vorschläge. Vielleicht finden 
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sich Programmautoren, die Ihre 
Ideen umsetzen. i 
Der Kompressor läuft bei uns nach 
wie vor problemlos. Allerdings be- 
kamen wir bereits mehrere Anrufe 
und Schreiben von Lesern, die eben- 
falls von Schwierigkeiten berichte- 
ten. Wir konnten aber bis heute 
nicht feststellen, wo die Ursachen 
dieser Schwierigkeiten liegen. 

Der Soundsampler wird unseres 
Wissens nach bisher von keinem 
Hersteller angeboten. 


Lange Suche 
Ich besitze einen C-116 sowie 
eine Floppy 1551. Ich suche 
nun noch ein entsprechendes 
Interface für einen RS 232C 
Interface-Drucker. Laut 
Handbuch zum Script/Plus 
Textverarbeitungsprogramm 
gibt es von Commodore ein 
Cartrige 1011A dafür, aber we- 
der Commodore noch andere 
Computer-Cracks waren in der 
Lage, mir zu helfen. Nun 
möchte ich gerne wissen, ob 
Ihr mir mit einem Interface bzw. 
Bausatz weiterhelfen könnt. 
Jürgen Posth 
Red. 
Einen Hersteller, der ein entspre- 
chendes Interface bzw. einen Bau- 
satz anbietet, gibt es wohl kaum. 
Die einzige Möglichkeit besteht un- 
serer Meinung nach darin, ein 
User-Port zu besorgen und die ent- 
sprechende Software (Plus 4 Ter- 
minalprogramm) auf C-116 umzu- 
schreiben. Bei weiteren Fragen kon- 
sultieren Sie am. besten. unseren 
Hotline-Service. 


Schwerer Anfang! 

Ich besitze erst seit kurzer Zeit 
einen -Plus 4. Weil ich nicht 
sehr viel von Computern ver- 
stehe, bitte ich Sie mir zu be- 
‚antworten, ob man für einen 
Plus 4 auch 64k verwenden 


C16-SA 4/88 


kann. Und wenn dies der Fall 
ist, ob man 64K auch zusam- 
mengesetzt bestellen kann. 
M. Busch 
Red. 
Eine Erweiterung für den Plus 4 
gibt es nicht. Der Plus 4 besitzt be- 
reits 64K und ist dadurch mit Spei- 
cherplatz recht gut versorgt. 


128K für den Plus 4? 
Ich besitze einen Plus 4 und 
möchte diesen auf 128 K auf- 
rüsten. Könnten Sie mir einen 
entsprechenden Bauplan bzw. 
Heft , in dem die Arieitung er- 
schienen ist, zu schicken? 
M. Arens 
Red. 
Das Aufrüsten des Plus 4 ist unse- 
res Erachtens nach, wenn überhaupt 
möglich, dann sehr schwierig. We- 
der gibt es Hersteller, die eine sol- 
che Erweiterung anbieten, noch ha- 
ben wir von irgendeinem Bastler 
gehört, dem ein solches Vorhaben 


gelungen ist. 


N.C.S. 
Ich habe einen C16 mit 64K- 
Erweiterung und eine Floppy 
1541. Das im Sonderheft 2/88 
abgedruckte Listing N.C.S. ist 
klasse. Ich habe schon einen 
großen Teil meiner Programme 
auf Diskette überspielt. Leider 
lassen sich Programme, die die 
Startadresse 1010 haben, nicht 
übertragen. So z.B. "Tutti 
Frutti” und "Trailblazer”. Wo- 
ran liegt das? Ansonsten finde 
ich Ihre Zeitschrift spitze! 
Rolf Büchner 
Die Red. 
Das liegt einfach daran, daß einige 
Programme noch einen zusätzli- 
chen Schutz gegen Kopieren besit- 
zen, den das N.CS. nicht 
»enacken” kann. Da ist leider 
nichts zu machen, jedenfalls nicht 


mit N.CS. 


Zeichensprache 
Als Besitzer eines C16/Plus 4 
Computers habe ich das Pro- 
gramm PRO-7 aus Heft 2/88 
eingegeben. Leider komme ich 
damit nicht klar. Es sind Zei- 
chen vorhanden, die ich auf 
meiner Tastatur nicht finden 
kann. Es handelt sich um ein 
»Dach” und einen Schrägstrich 
von links oben nach rechts un- 
ten. Für einen erklärenden 
Hinweis wäre ich sehr dankbar. 
Mario Galli 
Die Red. 
Kaum zu glauben, aber wahr! Diese 
Zeichen werden im Heft erklärt. 
Aber jeder macht einmal Fehler 
oder übersieht etwas, was eigentlich 
ins Auge springt. Schlagen Sie bitte 
die Seite 4 auf. Auf der rechten obe- 
ren Hälfte steht die Erklärung zu 
den gesuchten Zeichen. 


Maschinensprache 
Liebe Redaktion, ich besitze 
seit ca. 2 Jahren einen Plus 4 
und bin deshalb regelmäßiger 
Leser Ihrer Compute mit. Aber 
nun zum Problem. Ich habe 
aus der Normal-Ausgabe das 
Listing STARWARS eingetippt. 
Dazu verwendete ich den 
Checksummer OVM10. Wenn 
ich das Programm starte, dann 
entstehen ”Geisterfehler”, die 
ich dann nicht mehr beseitigen 
kann. 

a) Gibt es eine Möglichkeit, 
diese Fehler doch noch zu 
beheben? 

b) Wäre es möglich, im Son- 
derheft einen Lehrgang über 
das Thema "Maschinenspra- 
che für Anfänger” zu veröf- 
fentlichen? Ich nehme an, daß 
es viele Leser gibt, die wie ich 
keine Ahnung haben, was sie 
da eigentlich eintippen. ‘Es 
macht einfach keinen Spaß, 
etwas einzutippen, was man 


LESERECKE 


nicht versteht. Außerdem'bitts 
ich Sie, mir die Bedeütung der 
Begriffe "PC, SR, AC, XR, YR 
und SP” zu erläutern, da diese 
im Handbuch schlecht erklärt 
sind. Ich würde mich freuen, 
wenn Sie mir die Fragen be- 
antworten könnten. 

Roman Ruzha 


Die Red. 

Zur ersten Frage: 

Geisterfebler kommen meistens da- 
durch zustande, daß an irgendei- 
ner anderen Stelle im Listing noch 
ein Fehler vorhanden ist. Leider bie- 
tet auch unser Checksummer keine 
absolute Sicherheit gegen Tipp- 
fehler. 


Zu Frage zwei: Über einen solchen 
Kurs haben wir selbst schon. nach- 
gedacht. Im Moment ist es aber so, 
daß wir keinen Redakteur zur Ver- 
fügung haben, der sich diesem 
Thema ausführlich widmen könnte. 
Mal sehen, was die Zukunft bringt. 


Die von Ihnen erfragten Begriffe 
hängen direkt mit der Maschinen- 
sprache zusammen. Gemeint sind 
damit die Register . des 
Microprozessors. 


Hier die Erläuterungen: 

PC = Programm-Counter. An wel- 
cher Stelle der Prozessor ein Pro- 
gramm im Speicher abarbeitet. 
AC = Accumulator. Das ist das 
wichtigste Register, da alle Opera- 
tionen dieses Register nutzen. 
XR, YR = Zwei weitere Reyister, 
die für vielfältige Zwecke Verrwen- 
dung finden. 

SP = Stack-Pointer. Dieses Register 
zeigt auf den letzten Eintrag im 
Stack, einem Speicherbereich in dem 
z.B. Rücksprungadressen abgelegt 
werden. 

SR = Status-Register. Hier sind 
einige Flags enthalten, über die die 
Programm- und Prozessorsteuerung 


erfolgt. 
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BEE KLEINANZEIGEN 


Biete Hardware 


Commodore Plus 4 mit Datasette 
und Fioppy und 50 Disk mit bester 
Software. 1 Joystick, 40 Zeitschriften, 
diverse Programm-Disks für nur 340 DM 
Festpreis zu verkaufen. 

Tel.: 0591/2086 


en EI ER TREE 
E U I C-16(64K) & Plus 4 USER 
ufgepaßill! *** Eprombank *** mit 
92 KB - auf 384 KB zu erweitern 
“schaltbar.- *** Gebrauchsmuster an- 
'gemeldet *** Menuegesteuerte An- 
wenderprogramme auf Eproms als 
Autostartmodule lieferbar!!! 
Eprombrenner für Plus 4 incl. me- 
nügesteuerter Anwendersoftware auf 
Diskette, ausführlicher schriftlicher Er- 
klärung. *** 2. Betriebssystem ab- 
sturzfrei schaltbar. Info gegen 
Freiumschlag (80 Pf.). 
Jürgen Braunroth, Moordorferstr. 30, 
3057 Neustadt/Rbge. 1 


Hallo Freaks !il Verkaufe: 
C-16 + 64 KB: 100,- DM (VB) 

Floppy 1551 : 200,- DM (VB) 

40 Disks mit ca. 500 Programmen und 
50 Diskbox: 50,- DM oder alles zusam- 
men für : 300,- DM. 

Michael Knippschild, Waldstr. 29, 
5948 Fredeburg, Tel.: 02974/6615 








Verkaufe C-16 + 64k RAM 

Handbuch, Netzteil, 22 Originalspiele, 2 

Bücher und 1 Joystick. Neupreis 450 
M für VB 225 DM: Angebote an: 

Ralf Hahn, Lindenstr. 1, 

7091 Ellenberg 






c©-16 
45.- DM + NN 
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Möchten Sie auch einmal 
64-K-Programme benutzen? 


Fehlt Ihnen der nötige 
Speicherplatz dazu? 


Wir helfen Ihnen weiter! 


Bestellen Sie einfach unsere 
64-K-Speichererweiterung: 
Bausatz - bestehend aus: allen Bauteilen und 


ausführlicher Anleitung, umschaltbar 64 K/16 K 
« geliefert in stabiler Hartbox. 


Bestell-Nr. HWS-1-16 Bestell-Nr. HWS-1-116 


(Bei Vorkasse + 2.- DM Versand, Ausland nur gegen 
Vorkasse, Bearbeitungsdauer bis zu 3 Wochen, Be- 
stellungen nur separat vom Software-Service!) 
Bitte Computertyp angeben! 


Tronic-Verlag GmbH 


Postfach 870 - 3440 Eschwege - Tel. (0.56 51)3 00 11 


Neue Datasstte 1531 für C- 
16/116/Plus 4 Joystick + Adapter + 
Basic-Handbuch + Kassette-Basic-Kurs 
+ 3 Spielkassetten. 

Andreas Busch, Gummerother Str. 10, 
5270 Gummersbach 1 

Tel.: 02261/22891 


ne neuwertigen C-16/64 
B 
200 Spiele, Datasette, Joystick, Buch. 


Suche Tauschpartner für Plus 4. Listen 
an: Torsten Witschke, 





.Im Vogtland 67, 


4790 Paderborn-Marienloh 


Hilfe mein C-16 ist gestorben! 
Verkaufe daher: Datasette, 64K- 
Erweiterung, Joystickadapter, Spiele, 
Literatur...zusammen 120 DM, auch 
einzeln! 

Info Tel.: 07062/3499 


Verkaufe Plus 4 mit 2 Datasetten 
1531 und mit Diskettenlaufwerk 1541 








‘und mit Citizien Drucker und mit 2 


Commodore Joysticks und mit Top 
Software und mit viel Literatur. Dies al- 
les gibts bei: 

Martin Wellhöner, 

Grüner Weg 14, 4517 Hilter 1, 

Tel.: 05424/3147 





Verkaufe Plus 4 + 1531, 2 Joy- 
sticks, Basic-Lernprogramm (Buch + 
Tape), 2 Handbücher, Commodore- 


‚ Sachbuch Alles über den Plus 4, über 


30 Programme (ACE, Winter- und 
Sommerolympiade, Quiwi, Music 
Master), viele Zeitschriften, zusammen 
250 DM. Klaus-Dieter Eisenbeiß 

Im Barrenholze 12, 

4900 Herford 

Tel.: 05221/32458 











C-116 
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bis 48 KB Speicher 


AKRRRKXR 


x Datenfernübertragung 


x (64 6128 PLUS4 C16 

Mailboxen, DATEX-P, Telebox jasogar VIDEODAT, 
Bildschirmtext und VIDEOTEX 

DFU-Anlagen für alle Commodore Computer auto- 
matischer Wahl von dem Computer, Wahlwiederho- 
lung, Kurzwahlziffern, 150-Tel.-Nr.-Speicher, 


Für C16 Extra Doppeluserport mit RS 232 
DFÜ-Anlagen ab DM 198,00 INFO bei 





DFÜ DFÜ DFÜ 
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x GUSS DATA CONNECTION TEL. (0.2723)6679 x 
KARKRKKKRKKKKKKKKRKKEKKNN 


€ (1)16/Plus 4 Mausadapter für alle 
GEOS (Joyport)-Mäuse + Grafikpro- 
gramme für 35 DM! Adapter + Maus mit 
2 Tasten!!! + Grafikprogramm DM 
100,-{Disk/Tape). HEX-Zusatztastatur 
zur Eingabe von MC-Programmen mit 
TEDMON oder MC-Checksummer oder 
in Basic als zusätzliche 2+16 Funk- 
tionstasten mit Programm (Disk/Tape) 
DM 35,-. Hans-Dieter Veit, Rennweg 21, 
8441 Aiterhofen 


Achtung !!l C-16(64K) USER! Die 3+1 
des plus 4 (auch in deutsch) in Ihren 
Computer durch uns eingebaut. 
Außerdem: *** Für den C16 die starken 
Netzteile 1200 mA DM 35.00 incl. 
Steuer, Porto & Verpackung. Nur 
Vorkasselt! Jürgen Braunroth, Moor- 
dorferstr. 30, 3057 Neustadt/Rbge. 1 


*** Sensationell | *** 
Top-Lightpen C-16/Plus 4 incl. Demo- 
Software nur noch 50 DM. Freeware G- 
16 pro Disk nur 10 DM: 

Tel.: 06451/23125 ab 18 Uhrl 











i Verkaufe Plus 4, Datasette, 4 Origi- 


nale, 2 Joysticks, ca. 300 Games, Lite- 
ratur (NP ca. 200 DM). Alles in 1 a 
Zustand. Preisvorstellung 210 -250-DM. 


Angebote an: 
Tel.: 04971/4550 nach 19 Uhr (Frank)! 


Commodore Plus 4 Floppy 1551, Da- 
tasette, Philips Grünmonitor, Modem + 
Software, 2 Joysticks, Thermodrucker 
18 Nadeln + Interface, 30 Bänder für 
Drucker, Disketten, Boxen, Bücher, 100 
Originalsp./Anwenderprogr. alle neuw., 
originalverp., komplett (Drucker auch 
einzeln). NP 2.400 DM, VB 1.350 DM 
abzugeben. 02302/65606 ab 19 Uhr. 


E-PROM-Platine mit Sockel und Ge- 
häuse für C-16/+4 nur 20 DM. Diverse 
Software auf E-Prom. Info gegen 
Freiumschlag. 

Harald Hobbelmann, Junkernkamp 18, 
2822 Schwanewede, Tel.: 04209/5390 











| Verschiedenes 


;Welcome an der Pforte der unver- - 
gänglichen Geheimnisse! 
Mailbox: 07361/43640, 08234/8809 oder 


07261/13708; Par.: 300,8N1 





Compute mit 8/85 - 6/88 für 80 DM; 
Compute mit Sonderheft C-16 1/86 -4/87 
DM 35 (einschl. 2 Computronic). 
Michael Risse, 
Wilhelm-Leuschner-Str. 59, 

6054 Rodgau 5 


Achtung C-16/Plus USER!!! 

Wir suchen noch Mitglieder im In-und 
Ausland! Interesse? Infos bei: 

ICUC, Halweg 77, > 

D-4320 Hattingen 


Computerbörse: 
17. - 19.06.1988, 4010. Hilden; 
Stadthalle 

25. - 26.06.1988, Düsseldorf, Rheinte- 


3 


- fassen . 


02. + 03.07.1988, 5170 Jülich, 
Stadthalle 

09. + 10.07.1988, 4040 Neuss, 
Nordstadthalle 

16. + 17.07.1988, 4220 Dinslaken, Saal 
am Altmarkt 

23. + 24.07.1988, 4019 Monheim; 
Festhalle N 
Jeder kann als Anbieter teilnehmen! ' 
Info: Tel.: 02845/27260 | 


ü 


Suche Compute mit-Hefte und 
bespielte Programm-Kassetten von 
Compute mit (auch Sonderheftel), 
Marcus Lutz, 

Auwaldstr. 64, 

7800 Freiburg 25 

a ET ER 
Suche gut erhaltenen und 
funktionstüchtigen Plus 4 mit Dis- 
kettenlaufwerk, evtl. günstigem Drucker 
und Software. 

Rainer Legelli, G. Keller Str. 12, 

7750 Konstanz, Tel.: 07531/65809 


Suche Software für C-16/Plus 4 
jeder Art. Nur Liste und Preise an: 
Bodo Brämisch, Bergstr. 4, 

5441 Lirstal 


Hey C-16/Plus 4 Freaks 
Suche billige Floppy 1551: mit Bücher, 
Übernehme evil. Restbestände an Dis- 


"ketten (bespielt und unbespielt). 


Sascha Weber, 


‚Berliner Str. 11, 2061. Seth 
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veröffentlicht! 








entgegengenommen! 













Suche Programme wie: ACE, 
Football-Manager, Mercenary.... 
Cass/Disk für C-16 und 64K. Zahle 50% 
des Kaufpreises. Christian Schrott, 
Hegnerstr. 4, 8457 Theuern 


NE Sn 
Suche immer defekte C-16/116 & 


plus /4 
Floppy’s & Datasetten! Angebote mit 
Fehler- und Preisangabe. Telefonnum- 
mer angeben ich rufe zurück! 

Jürgen Braunroth 
Moordorferstr. 30 
3057 Neustadv/Rbge. 1 

















für .Sicherheitskopien genutzt 
Bedienungsanleitung. 


Postanweisung od. Einschreiben 






behandelt. 
1. Auflage 










lidieren u.a. Incl. Anleitung 
Für © 16/116 u. Plus 4 










Bedienungsanleitung. 
Für C 16/C 116 (+64KB)/Plus 4 


6 
Für © 16 / 116 und Plus 4 


Anleitung!. 
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Computersoftware & Datensicherung © 16/ € 116 / Plus 4 
SYS-CRACKER V.1.0 ersetzt Kopierprogramm und ist derzeit das beste und 
einzigste Übertragungsprogramm dieser Art. Siehe auch Test in der.»Compüte 
mit« Sonderausgabe 1/88. Mit SYS-Crack sind Sie erstmals in der Lage, die 
meiste protective Software von Original-Kassetten zu duplizieren..und auf Dis- 
kette od. auch Kassette abzuspeichern. 
teilig und der Autostart wird absorbiert. 
werden !!! Mit 


Für C 16 / 116 +64 K-RAM u. Plus 4 


Übertragungshandbuch zum SYS-CRACKER V.1.0 
Enthält alle derzeit bek. Informatione 
lassen od. auch nicht. Schwierige Übe 


in über Programme, die sich übertragen 
rtragungen, sowie wichtige Tips & Tricks 
und warum einige Programme nicht übertragbar sind, werden, u.a. auch 


DISK-RETTER V.3.5 ist ein Werkzeug, daß in keiner Programmsammlung feh- 
e sind verloren! Mit DISK-RETTER aber, 
REL auf einfache Weise wieder ins Le- 
ben rufen. Mit menüsteuerung für: Directory, Formatieren, Umbenennen, Va- 


len sollte. Einmal gelöschte Programm 
können Sie alle Files, PRG,USR,SEO, 


Unbedingt Speicherkonfiguration angeben! 


ROULETTE ist ein unterhaltsames Gesellschaftsspiel mit Casino-Atmosphäre. 


Für mehrere Mitspieler ausgelegt. Mit Joysticksteuerung, Spielregeln u. 


0 BASIC-PROGRAMME / unsortiert aus allen Bereichen. Ohne Anleitung! 


45 BASIC-MAMMUT-PROGRAMME / unsortiert aus allen Bereichen. Ohne 


Für © 16/116 + 64K-RAM u. Plus 4 
Achtung Programmierer LH 

Wir suchen ständig gute Programme. Haben Sie ein gutes Programm ge- 

2272 Dann schreiben Sie uns oder schi- 

cken Sie uns Ihr Programm mit einer Kurzanleitung und Honorarvorschlag 

zu. Jede Zuschrift wird beantwortet. 


“schrieben und möchten es verkaufen 





* Zur Bezahlung von Kleinanzeigen werden keine 
Briefmarken oder Fremdwährungen mehr 


* Kleinanzeigenaufträge unter Angabe einer Post- 
lagerkartennummer oder dem Hinweis „post- 


Biete Software 


C-16/plus 4 Tausch und Verkauf von 
Software. Ab 07/88 neue Liste gegen 
Rückporto (nur Disk). Sendet 80 Pf. 
Briefmarke an: 

Horst Meyer, Overguenne 89, 

4600 Dortmund 30 


mm nn — — 


Zweiteilige Programme werden ein- 
Achtung: SYS-CRACKER darf nur 
ausf. deutscher 


“* DM 39,- ** 
“” DM 35,- “r 


“* DM 10,- “. 


nur Disk ** DM 29,- ** 


nur Disk ** DM 15,- ** 


nur Disk ** DM 30,- ** 


nur Disk ** DM 20,- ** 


Wichtige Hinweise für Kleinanzeigeninserenten. 


* Private Kleinanzeigen werden nur gegen Vorkasse lagernd” werden nicht veröffentlicht. 


* Der Verlag behält sich vor, alle von der Bundes- 
prüfstelle indizierten Programme, ersatzlos zu 


streichen. 


* Wir weisen darauf hin, daß urheberrechtlich ge- 
schützte Software nur im Original zum Verkauf 
oder zur Verbreitung angeboten werden darf. 


C-16/plus 4 Freaks 

Verkaufe Software (nur Disk). 1328 Blöcke für 
nur 20 DM. Schein an: 

Martin Schroer, Doristr. 4, 

4670 Lünen 

Kein Porto!!! Spiele + Anwenderprogrammel 


a 
Verkaufe 30 Spiele für C-16 nur 10 DM!!! 
10-Markschein + Porto an: 

Frank Eilers, Tulpensir. 4, 

2722 Visselhövede und ich liefere promt!!! 
ee Be nn 


Verkaufe für Plus 4 oder C-16/64K 

4 Disk voll mit Top-Software (2seitig). Schickt 
20 DM an: 

Andreas Jungheim, Tulpenweg 4, 

3430 Witzenhausen 6 

Disk kommt postwendentll! 


Superpreise für Supersoftwarel 

300 Programme = 90 DM 

500 Programme = 50 DM 

1000 Programme = 100 DM 

alles für C-16/plus 4. Info gegen Rückporto. 
Bezahlung: bar oder Scheck! 

Holger Scherer, Jungstr. 25, 

6550 Bad Kreuznach 

Suche Soft für Plus 4/0-128 CP/MI!! 
Pe ne 
Public-Domain C-16/Plus 4 

viele interessante Programme nun endlich 
nach Sachgebieten geordnet. Programme für 
Sihule, Beruf, Dateien, Adventures, Druckeru- 
tility und viele Spiele! Anwendung für Compu- 
ter, Floppy etc. Liste und randvolle Probedisk 
nur 10 DM bei: 

F. Eitner, Dr. Beber-Str, 17, 

'2222 Marne 


a 111jtit nn nn —— 





An alle C-16/116 und Plus 4 USER! 
Ein Super Terminalprogramm für 64K. Mail- 
boxen, Telebox, Datex-P usw. Automatische 
Wahl aus dem Gomputer, Autoanswer, 
Wahlwiederholung, 150 Tel.Nr.-Speicher bis 48 
K zum Superpreis von 49,90 DM, Disk + 
Verpackung/Porto 5.DM Nur gegen Vorkasse 


bei: 
Olaf Schlüter, Breslauerstr. 92, 
7710 Donaueschingen 


Bee BRRIRE AS FEE e 
Aber Hallo !!! 30 Programme für C-16, C- 
116, Plus 4 auf Disk für nur 30 DM Vorkasse. 
Z.B.: Quiwi, Mercenary u.a. bei: 

Fank Kuznik, Erlenweg 11, 

3252 Bad Münder 1 
ee 
Achtung, Achtung, Achtung! 

Biete Vokabeltrainer u.a. für C-16 + 64K, Plus 
4 und C-84. Liste gegen 80 Pf an: 

Rainer Wolf, Mostholzsir. 9, 

8580 Bayreuth 


Un 
Pius 4 *Geschichtstrainer* Plus 4 
Rechentrainer mit Textaufgaben, Dreisatz- 
Prozent-Zins. Info von: 

Richard Gresser, 

Postiach 44 13 41, 

7014 Kornwestheim (nur Tape!) 


‚C16IC116/Plus 4 


Verkaufe meine besten Programme auf Disk 
oder Kass (Disk = über 30 Programme, Kass. 
= 20 Programme) je 30 DM. Solange der Vor- 
rat reicht. 

Richard Stahnke 

Paul-Therstappen-Sir. 87 


‚4054 Nettetal 1 


nn 
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BEEN KLEINANZEIGEN 


Computerservice 
Tino Hofstede 

An der Windmühle 8 
5010 Bergheim 5 


Programmkatalog 


05 mit ernsthaften Programmen und Spielen für 


Amiga 
C128 
+C64 


:C16/116 
-Plus/4 
«VG 20 


gegen 2 mal 80 Pf in Briefmarken 


25 absolute Top-Games 

für C-16/Plus 4 auf Tape für 20 DM..Nur 
Vorkasse! Mariusz Sawicki, 

Bunziauer Weg 4, 3203 Sarstedt 





C-16/ +4 Erotika Spezial ist dalll 
Es ist gerade aus England eingetroffen. 
200 Super Bilder. Natürlich digitalisiert! 
Sofort bestellen, wegen ständiger Nach- 
frage! Preis: 30 DM (10 Diskseiten); 30 
‚DM = 3 Kassetten. Samantha Fox Il = 
10 DM auf Cass. oder Disk! Bestellun- 
gen gegen bar oder Scheck an: BYTE- 
SOFT, Tilsiterstr. 13, 5000 Köln 60 





C-16 Software: Quiwi D 16,- DM; 
Wintergames C 16,- DM; Summerga- 
mes © 16,- DM; Highscreen CAD (64K) 
D 28,-- DM. ; 

C-64 Software: Dela-Nibbler D 25,- DM; 
Speed Burst D 27,- DM; Expert Car- 
tridge (ASM 11/87) 80,-- DM. Liste bei: 
Reinhold Melber 

Josef-Natterer-Weg 10 

8850 Donauwörth-Schäffstall 





Achtung!!!C-16/116/plus 4 USER 
Verkaufe Softwaresammlung 500 Pro- 
gramme auf Disk für nur 250 DM. Dar- 
unter Sommer- und Winterolympiade 
von Kingsoft. Ungefähr 200 Originalpro- 
gramme. Viele Sonderheft-Programme. 
Alles für nur 250 DM. 

Olaf Schlüter, Breslauerstr. 32, 

7710 Donaueschingen 

P.S. Kein Schrott, nur gegen’ Vorkasse! 








€C-16/116[64KB) und Plus 4 
Programme für Heim und Büroarbeit, 6 
Anwenderprogramme (nur Disk), Infor- 
mationsschrift gegen Rückporto (80 Pf.) 
bei: 


Guido König, Schlenderhanerstr. 10 a, 
5000 Köln 60 (Nur schriftlich I) 





GEOS für C-16/C-116/ +4 

Was? Sie arbeiten immer noch im 
Basic-Modus? Veraltert! Ich biete Ihnen 
2 GEOS-Programme mit Anleitung ge- 
gen 20 DM-Schein. Sie brauchen keine 
Maus! 20 DM-Schein an: 
Royal-Intersoft, Hauptstr. 27, 

5758 Fröndenberg-Dellwig 

Jeder 10. bekommt ein Gratispro- 
gramm! Tausche und verkaufe! 


ee 1-7 NY. | Copy 1551 "+++. 
Endlich!, das 19 sek. Backup für der 
Plus 4/C-16/0116(64K) + 1551 istnun 
zum Superpreis erhältlich! Kopiert 
Read-Error 22 und 23. Gegen 20 DM 
(NN: 23,20 DM) bei: Rüdiger Siebert, 
Tegeler Weg 1, 3549 Volkmarsen 
Tel.: 05693/7118 ab 18 Uhr! 








Software Katalog 1988 

Neueste Originalsoftware für Ihren 
Commodore 16/116/plus 4. Beste Qua- 
lität zu fairen Preisen!!! Fordern Sie 
noch heute ein Gratis-Info oder den Ge- 
samtkatalog für nur 80 Pf. an: 

P. Schäfers, Riekestr. 5, 

4402 Greven 1 





C-16/116/plus 4 USER Achtung! 
Game-Paket 1, eine menüegesteuerte 
13-Spiel-Sammlung (u.a. mit BIG MAC, 
Formula One, POD, Gunslinger, Mr. 
Puniverse, Malone, Hustler, Galaxy) mit 
Bedienungsanleitung für 30 DM abzu- 
geben. Nur Disk. Tausche auch: Ko- 
pierprogramme und Spiele. 

Marcus Krafczyk, Kaiserstr. 1, 

3320 Salzgitter 51 

Tel.: 05341/394615 


1250 Pokes für nur 10 DM! 

950 Spiele- + 300 Programmpokes, daß 
verspricht ewiges Leben beim Spielen 
(©-64). Schein an: 

Christian Lindhoff, Schelmengraben 7, 
6120 Michelstadt 


FREESOFTWARE 

für C-16/116/plus 4 22 Disks 

Pro Disk 2,50 DM, Demodiskette 
(doppelseitig) + Liste nur 10,- DM, bitte 
Computertyp angeben! 

Viktor Jürgens, Prinzenstr. 131, 

2330 Eckernförde 











Das Super-Software-Angebot 

12 Diskettenseiten voller Spiele 
"64K/+4 erforderlich* Superspiele z.B. 
ACE, ACE 2, Sommer- + Winterolym- 
Ppiade, Jumpjet, Paintbox, Monty on the 
run, Girls 1+2 usw. Wichtig: Bestellun- 
gen bitte erst ab 18.07.140 DM in bar an: 
Markus Büring, Markusstr. 7, 

4470 Meppen !!!Nur Disk!!! 
ee FT ER ITENNGE 
C-16/116 [64KB)/Plus 4 

Relative Dateiverwaltung! Bis zu 1500 
Datensätze pro Datei, freie Maskener- 
stellung! Max. 10 Suchbegriffe! Super 
Ausdruck Nur für Diskette! Mai 
Handbuch auf Diskette! Preis 19,50 DM 
+ Porto! NN! Info und Bestellungen an: 
Jürgen Vorwerk, Dörener Weg 29a, 
4790 Paderborn, Tel.: 05251/58423 
re 
Achtung C-16/116/plus 4 USER 
Biete 10 Diskseiten (6000 BI.) mit ca. 
190 Spielen und Anwender für 50 DM. 
Auch Auswahlliste. Spiele sind bis zu 90 
% des Ladenpreises zu verkaufen, 
Terra Nova, ACE1+1l, Quiwi, Jump Jet. 
Schreibt an: 

Manfred Lippert, Spitzholzweg 8, 
8201 Söchtenau ; 

Suche auch Tauschpartner!!! 





Achtung C-16/Tape Wahnsinn 50 
Spiele 25 DM oder 70 Spiele 30 DM. 
Incl. Porto/Kass. auch andere Software 
bei: H.-H. Buß, Hauptstr. 165, 

2992 Dörpen/Ems 


€C-16/1 16[64K)/Plus 4 - 
*****Relative Dateiverwaltung***** 
Bis zu 160 KB Daten fest im Griff! Bis 
zu 1500 Datensätze pro Datei (das kann 
kein anderes Programm). Freie Masken- 
erstellung in 10 Feldern a 24 Zeichen! 
Sehr schnelle Suche! Bis zu 10 Such- 
begriffe! Menuegesteuert! Komfortable 
Ausdruckmöglichkeiten! Freie Belegung 
der Funktionstasten! Durch Fehlerbe- 
handlung maximale Datensicherheit! 
Nur mit Diskette lauffähig! Mit 
Handbuch auf Diskette! Preis: 19,50 DM 
+ Porto/Nachnahme. Informationen 
und Bestellungen bei: 

Jürgen Vorwerk, Doerener Weg 29a, 
4790 Paderborn 

Tel.: 05251/58423 

Übernehme auch Auftragsprogram- 
mierung! 





*?** Sensationell!*** 
Top-Lightpen C-16/Plus 4 incl. Demo- 
Software nur noch 50 DM. Freeware C- 
16 pro Disk nur 10 DM. 

Tel. 06451/23125 ab 18 Uhr 





LOGO für den Plus 4/C-16(64K). Modul, 
Disk und Handbuch für 50 DM bei Vor- 
kasse (NN + 5 DM). 

Harald Hobbelmann, Junkernkamp 18, 
2822 Schwanewede, Tel.: 04209/5390 
EFT TIERE 
Plus 4/C-16 verkaufe Kikstart, 
GWNN, Zagan, Warrior, Xadium, 3-D- 
Time Trek (Originale) je 6 DM gegen 
Vorkasse. 

Kemal Akman, 

Gneisenaustr. 3, 

3050 Wunstorf 1, Tel.:05031/6154 


©-16/Plus 4: Spiele, Original-Software 
zu Schleuderpreisen, Restliche gegen 
Freiumschlag. 

H. Scheel, 

Kollaustr. 178, 

2000 Hamburg 61 





nr Ta Er 
C-16 + 64K/Plus 4!Super Utilitypa- 
ket zu verkaufen. 55 nützliche Pro- 
gramme (nur Disk) für nur 30 DM. 
Scheine an: 

Holger Borker 

Hermann Heukingstr. 7 

4450 Lingen 
ee er Er TE ER 
Verkaufe Originale für C-16 50% 
unter Neupreis, z.B.Quiwi, Sommer- 
olympiade usw. Liste gegen 80 Pf. Porto 
bei: 


Frank Dirks, 
Auricherstr. 107, 
2943 Neu Folstenhausen 


Sven Faulhaber’s Softwareversand 


Ä Hallo C64, C16, C116 und Plus 4 User, 


9 wir sind ein Softwareversand, der Hardware, Anwen- # 
4 derprogramme und die allerneusten Spiele von be- Ri 

kannten Herstellern zu absolut niedrigen Preisen an- " 
a bietet. Da wir fast alles am Lager haben, können wir £ 
a sofort liefern. Unsere Versandkosten sind sehr ge- 8 

ring (DM 2,50 bei Vorauskasse und DM 5,- bei Nach- Er 

nahme), ab DM 100,- senden wir sogar versandko- e 
4 stenfrei! Unser neustes Info-Heft (bitte Computersystem 
M angeben) erhälst Du unverbindlich und kostenlos von R 
9 SF Soft, Abt. D, Mühlenweg 7, 3401 Seulingen $ 
4 P.S. Wir haben auch Software und Speichererweiterun- Ri 


gen für den VC20O! 





C16 - SA 4/88 


ne ee 


Pr ee. ee ee. nich 
re ET EEE m 


m. 


Mn U EEE PUT, 





Aranresseneneeaen 


Garantiert nicht am Markt 
Biete an: 
Wissenschaft. Prg. Elektronik 
Mit den 30 Menü-gesteuerten -Prg. 
taßt alle techn. Probleme lösbar. Von 
Meßbereichserweiterung über Span- 


nungst. zur _ Induktifität-Kabel- 
dämpfungsglieder Widerstandsbe- 
rechnung HF.C.Anp. usw. Druckt 
selbstverst. Daten u. Schaltplan nur 
(Plus 4 oder C-16 64K) für Commo- 
dore und Star Drucker 
Roswitha Kaml, Postfach 1110 
8494 Waldmünchen, Tel.: 09975/1391 


EREREERRERERFERRE 
Eerreeeereeeee 


PLUS 4 Lernprogramme C-16 * 
Vokabeltrainer > 
Grammatiktrainer Englisch ® 
Grammatiktrainer Französisch % 
Rechtschreibtrainer 
Rechentrainer 
Je DM 15 + Nachnahme 
Gratisinfo von I. Thurm 
Postfach 1671, 
706 Schorndorf 


pre rrrrerrrertr 


rt 
Der Spezialist für: 
C-18/C-116/Plus 4/1551 elc. 


Umbau 64K - Umbausels -Freeware 
„Reparaturen -Zubahör - Turbotape 
Infos - Tips -Tricks - Hilfe -Technik 

LOGO-Forth-Compller-Assembler 
1531-1541-1551-1581-C16-C116-+4 
Alle Commodore Originalersatztelle 

Module-Platinon-Spiele-Bücher 
Bel uns bekommen Sie alles was 08 für 
diese Geräte gibt (256KB +4!) 
Technisch kompetent u. preiswert! 


SELELEPPEHH HRS 
SELHEEHPOEHLEER 


Sperre rrrrrrrt 


+rprrrrrr 


Elektronik-Technik Ing. Uwe Peters 
D-2351 Trappenkamp -Tannenweg 9 
Tel.: 043243991 


FETTE 00 
ER ETT 


ae Achtung 
Se Commodore-User . 
an Achtung! 

Wir liefern Software und Zube- 
«fe hör für C-64, 0-128, O-16, Plus 

4, Amiga und Atari. Fordern Sie an 
de unsere kostenlose Liste an. ol 


+rrrerertrtrtrrrtrtrtt 
44er 


BERLAU-Soft 
Postfach 14 15 De 
2150 Buxtehude nn 
a 
EHERSHIMSHSHERSHIMERINZTN 
3X Info für RE ERR 432 
BG Br 
3% Höimgerensb 
8836 Ellingen 
!!!Computertyp angeben!!! 
EHSHEHSHSHSREHSHINERENSEN: 
Ci16 - SA 4/88 





Sr rrrrrrrrrrrrt 


+ 

% ___ Biorhythmen-Profi (Druck 

# in Kurvendiagramm /Monat) u. p4. 
Weitere C16 Prg. 
Biorhythmen + D 

Hautoberfläche Mathe/ 

Bruchr. kein Problem-Ra- 

tenberechnen-Lotto-Floppy 

Prg.-Antennen Prg. Disk/25,00 DM 

evil. Kass. Prg. evil. einzeln. 


Nachnahme/Vorkasse bei: 
Roswitha Kaml, Postfach 1110, 
8494 Waldmünchen 
Tel.: 09975/1391 


Ser rrrrrrrrttt 
PERLE ELTL LESEN, 


+4 rt 
+4 rt rt 


Frühlingsstr. 12 

» 8831 Weiboldshausen 
* Computertyp angeben! : 
PEREEETTET DE E22 02 2 020 


HH HHHHHHHHHHHL 


» ” 
> Spitzensoftware für %$ 
*» C-16/+4 undCPC # 
* * 
® » 
%* Kostenloser * 
x Katalog bei: 2 
* Jupitersoft GdbR "* 
* * 
= . 


ser gBAIC-16riE Plus a PL 
® 54 KByte Erweiterung 55,00 © 
© Sprachsynlesizer kompl. 0 
& Lighipen inkl. Software 59,00 & 
& Transistor/Diodentester 59,00 & 
„9 Kondensator Tester 59,00 & 
p< USER-Port mit 6526 59,00 > 
Hardcopy-Modul 29,90 
D.-Zeichensatzmodul 29,90 4 
© Texteditor-Modul 3,0 © 
% RTTY-Modul 52,00 
Programmsammlung Disk 1 19,90 & 
Script Plus Erw. Disk 19.0 & 
+ Weiteres umlangreiches Zubehör. % 
Info: Willi Keßler - elektronik - 
Auprechtsir. 14 “ 
% 6136 Edesheim, Tel.: 0632377114 © 
HH HHHHHHHHHHS 
EERERRERRRRERRRER 


8 C-16/Plus a@RATIS-INFO® 
® Spiele - Anwender - und ® 

Kopierprogramme/Hardware. 
Gratis POKE-Liste bei: 8 


& Thomas Görtz & 
Postfach 
8 Soden 8 
Postkarte genügt!!! & 
BRRERERERERRRRER 
+r++++++r++++ 
+Plus 4 - C-16 - c-64 + 
+ Lernprogr. + 
Techn. Mathe + Grafik zu ree- 


+ iem Preis Zahnr., Festigk., 
+ Hydr., Geometrie, Bruchrechn., 4 
Vokabeln -Cass/Disk. Kat. 1 DM 
Briefm., Comp. Typ angeb, * 
+ Anita Ristau, Peeizweg9, + 
+ 3320 Salzgitter 1 + 


+++ sr rrr+r+t 


Computer Serbite 








































Michael& Joachim Maier GbR 
1304 - 7913 Senden/llier 
Telefon (07307) 6230 
SPIELPROGRAMME C-I6IC-118/PLUS4 ANWENDERPROGRAMME 
ACE 64K 90 (DA | TURBO PLUS MODUL (M) 3900 






























FORTRESS MUSIG MASTER (9) 1790 (D) 1790 
UNDERGROUND (d 990 (D) 990 | PAINT BOX (KR) 16% (D) 1690 
TUBE RUNNER (N) 40 FORMULA 64 K „(D) 3990 | 
MERGENARY COMP. (90 (D)4900 | FAKTURA 64 K (D) 9990 | 
MERGENARY 64 K MO (DIA | TEXTWORD II64K ) 4990 3 
FIRE GALAXY 9m (D) 990 | TEXTWORD II PLUS 64 K (0) 8990 

KRÖSUS 64 K 7%  (D)29%0 | PROFIPACK II 64 K (D) 12000 
STEVE DAMES SNOOKER (K). 990 GKR FIBU 64K (0) 6800 

ACE 2 an (MAN : 

POWER PACK (10 SPIELE) (K) 24.90 = NEU - NEU - NEU - NEU - NEU - NEU - NEU - 

OMNIBUS 1 (10 SPIELE) {K) 240 

OMNIBUS 2 (10 SPIELE) (K) 4,90 TEXTSYS 64 K (K) 2490 (D) 3490 

IKARI WARRIORS 70 Textverarbeitung mit 80 Zeichen Darstellung, Serien- 

BMX SIMULATOR K IR briefoption (nur Disk) individueller Druckeranpassung 

CHAMPIONSHIP und deutschem Zeichensatz (Monitor ist unerläßlich! 
WRESTLING (K) 40 

PLUS 4 SEXTETT 240 (0) 240 

DEMOLITION 170 (0) 17% 

ALIENS 290 JOYSTICKADAPTER 990 

SUPERMAN N 90 JOYSTICKVERLÄNGERUNG 140 

LIBERATOR N 90 QUICKSHOT II 1490 

SOMMER OLYMPIADE (240 (D)2480 | 64 K RAM ERWEITERUNG 6900 

EXPLODING FIST N 98 ABDECKHAUBE PLUS 4 1190 

TRIPLE DECKER II, IV je (K) 790 ABDECKHAUBE . 

SPY VS SPY K) 2990 C 18DATASETTEIFLOPPY je 690 

SABOTEUR (auch64K) (X) 990 DATASETTENADAPTER 1531 AN C 641128 14,90 





Katalog mit Programmbeschreibungen NUR DM 1,00 in Briefmarken. 
Versandkosten: bis DM 150,- Vorauskasse DM 350 Nachnahme DM 6,- 
ab DM 150,- keine Versandkosten 
Preisänderungen, Imümer und Streichungen vorbehalten. 
Besuchen Sie unser Geschäftsiokal in Senden, Haydnstraße 2. 


Stop !!! C-16/116/ +4 
Spitzensoftware zu irren Preisen! Info 
gegen 80 Pf. bei: 

Dohle Soft, Deichweg 6, 2935 Bockhorn 
en nn Ann ne 
Stop Plus 4 Software ab 50 Pf. pro 
Programm! Spiele und Anwender 


Ce) 1,472 





Software. Info gegen 60 Pf. Marke bei: 


T.Gilsbach, Waldstr.35, 5948 Fredeburg 
ee a er — 
Plus 4 *** Plus 4: Biete Software 
zum halben Preis! Liste unter: Seb. Haß, 
Fitzbeller Weg 6, 2351 Brokstedt 


ae 
C-16 Ökopoly * C-16 Ökopoly * 
Das neueste Public-Domain-Programm 
ist erschienen. Gegen 5 DM Vorkasse 
bei: M. Lutz, Auwaldstr. 64, 

7800 Freiburg, keine Briefmarken 


Plus 4 Einsteiger sucht Software auf 
Diskette. Listen an: 

G. Franzmann, 

Altenessener. Str. 80/84, 43080 Essen 


— m 


Plus 4 Tauschpartner gesucht 
Habe massig Software, Disk oder Tape. 
Listen an: 







Sven Hüppmeier, 
Ginsterweg 8, 
Tel.: 02955/1240 


Inserentenverzeichnis: 





Bytetechnics .....nu0nnnnnnnnnnesnnennnnnnnennennnnenn S.61 
Computerservice Maier ....snuuenerennnnnnnnnennn S.63 
Computerservice T. Hofstede „....unnneneer- S.66 
Dipl.Ing. M. Rätzel ..usunennnennnnnnnnnnnnennenennnne S.61 
S. Faulhaber’s Softwareversand .....runsnerr S.62 
Gewerbliche Kleinanzeigen .......unsunenenuene: S.63 


Guss Data Connection .........sensrennnenenennn. S.60 
Hapera Hardware-Versand ..mununennnnnnnnennne S.62 
KingSOft „......uuussns0nnnnnnnnnnnnnnunnsonunonnunnesnnns S.68 


Tronic-Verlag .„....2s22#n20u00nn0nnun0nunn nenn r 


S.2/60/67 


T.S. Datensysteme .....uusaonunnrannernannnenen S.15/60 
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Sonderheft 1/86 (Heft ausverkauft) 
Best.-Nr. CSOK-1 Kassette 25,- DM‘ 
Best.-Nr. CSOD-1 Diskette 25,- DM 


Cowboy-Duell, Mover, Freß-Man, Jump Man, 
Poker, Turmspringen, Tank-Wars, Rocketman, 
Comfort-List, und Merge-Routine, Win- 
dow-Manager, Softscroll 


Sonderheft 2/86 (Heft 6,50 DM) 

Best.-Nr. CSOK-2 Kassette 

Best.-Nr. CSOD-2 Diskette 

Pac Man, Jäger des verlorenen Schatzes, Oil of 
Texas, Mimi, Jäger der verlorenen Möhre, 
Diam, Skateboarding, Auto-Starter, Color 16, 
Ton Clock, Textprogramm, Haushaltskonten, 
Key-Caller, Soundmachine 


Alle Programme dieses Heftes können Sie als Programmpaker 


auf Diskette oder Kassette erwerben. 
Sonderheft 4/88 


Bestell-Nr. CSOK-4/3 Kassette 35,- DM 


Bestell-Nr. CSOD-4/3 Diskette 35,- DM 


Sonderheft 3/86 (Heft 6,50 DM) 
Best.-Nr. CSOK-3 Kassette 25,- DM 
Best.-Nr. CSOD-3 Diskette 25,- DM 
Hardscroll, Frame-Set, Load/Save-Signal, 
Computer-Kommunikation, Whitch, Super- 
Break-Out, Indiana Jones u. d. Schatz der 
Pharaonen, Master Mind, Kampf um Rom, 
Jumpi, Spionagelehrling, Monsterhunter, 
enesis - der Super-Assempler, Musik-Comp. 


Sonderheft 1/87 (Heft ausverkauft). 

Best.-Nr. CSOK-1/2 Kassette 25,- DM 
Best.-Nr. CSOD-1/2 Diskette 25,- DM 
Datamaker, Auto-Old-Routine, ‚Double 
Screen, 2x Laufschrift, Screen Editor, dload, 
Speichersplit 64 K, Turbo-Tape, Kunden- 
rechnungen, Riesenlabyrinth, Crazy Worms, 
SL Rich Freddy, Tedchip -Grafik und 

oun. 


Sonderheft 2/87 (Heft 6,50 DM) 
Best.-Nr. CSOK-2/2 Kassette 25,- DM 
Best.-Nr. CSOD-2/2 Diskette 25,- DM 


Trace, Window Ass, Single File Backup, Me- 
nügenerator, Print, Little Painter, Mac1, Mad 
Mamba, Megazone, Big Quest, Buchhaltung 
16, Mad Maze, Mr. Laby, Solitaire 


Sonderheft 3/87 (Heft 6,50 DM) 

Best.-Nr. CSOK-3/2 Kassette 25,- DM 
Best.-Nr. CSOD-3/2 Diskette 25,- DM 
Rocket Command, Flower-Power, WAR, 
Fang den Floh, Grabsteindorf, China-Clan, 
Basic-Extension, C-16 Emulator, Disk-Start, 
Multi-Disk, Merge-Routine, Mastercopy 2, 
Basic-Find-Routine, Checksummer (Basic), 
MC-Checksummer, REM-INV-Maker 


Bestellungen bitte an: 


Sonderheft 4/87 (Heft 6,50 DM) 
Best.-Nr. CSOK-4/2 Kassette 25,- DM 
Best.-Nr. CSOD-4/2 Diskette  25,- DM 
MC-Checksummer, Merge, Window-Manager, 
Basic-Start, Move Frame, Checksummer, GETSE- 
TREG, Musik-Demo, Musikus, Alldat, Super Bre- 
akout, Mastergolf, Voracious Eater, Bank- 
überfall, Flottenmanöver, Speed-Ball 


Sonderheft 1/88 (Heft 6,50 DM) 

Best.-Nr. CSOK-1/3 Kassette 25,- DM 
Best.-Nr. CSOD-1/3 Diskette 25,- DM 
Checksummer, MC-Checksummer, Sounddigitizer 
(Teil 1), Multi-Disk, WINDEF, Print-Timer, 
Soundmaster, File-Dump, AVP, Superbasic +4, 


Diamond Hunter, Dooly, U-Jäger, Crazy Factory, | 


Das Weltspiel 


Sonderheft 2/88 (Heft 6,50 DM) 
Best.-Nr. CSOK-2/3 Kassette 
Best.-Nr. CSOD-2/3 Diskette 25-DM 


Checksummer, MC-Checksummer, Sounddigitizer: 


(Teil2), NCS, Copy 64K, Jumping Bobby, Super‘ }: 


Senso, Abenteuer im Land der Burgen, Basic- 
Compressor, PRO 7. 


Sonderheft 3/88 (Heft 6,50 DM) 
Best.-Nr. CSOK-3/3 Kassette 30,- DM 
Best.-Nr. CSOD-3/3 Diskette 30,- DM 


Diskduplikator, MC-Help, Powerball, Death Pla- 
net, Solve Master, Trouble, Oil Hunter, Bio- 
rythmen, Vegetarier 5 


Tronic-Verlag - Postfach 870 - 3440 Eschwege 
oder telefonisch: (0 56 51) 3 00 11 (bis 19.00 'Uhr) 


Versand erfolgt per Nachnahme 


oder Vorkasse (Scheck, Bar) 


Eine Bitte: Der Softwareversand ist ein Leserservice des Tronic-Verlags. Alle Anleitungen 
sind daher dem entsprechenden Heft zu entnehmen. Wollen Sie ältere Software, bestellen 
Sie bitte das Heft mit. Sollte es ausverkauft sein, kopiert unser Versand gegen einen Un- 
kostenbeitrag in Höhe des Heftpreises alle Anleitungen für Sie. Vermerken Sie bitte auf 
Ihrer Bestellung » + Heft «! 





C16-SA 4/88 


25,- DM 


Ve — N 5 EEE FunR. Wu 0 Un REG ENGEN TORE un. 





Heft 4/87 

Commodore 
_ Bestell-Nr. COM CK 4/3 16,-- DM 
' Bestell-Nr. COM CD 4/3 20,-- DM 


' Moth (VG 20), Jeeper (VC 20), Monitor 

"(VG 20), Eifmeterschießen (C16/116/ 
Plus 4), Super-Q-Bert (C 16/116/plus 4), 
Froggy (C 16/116/plus 4), Memory 
Dump (C 16/116/plus 4), Ram-Disc- 
Monitor (C 64), Run Version Generator 
Startrip (C 64), Immigration (C 
64) 


Schneider 
Bestell-Nr. COM SK 4/3 16,-- DM 
Bestell-Nr. COM SD 4/3 23,-- DM 


Find (464), Tape Backup System (464), 
‚Die schwarzen Diamanten (464, 664, 
6128), 3-D-Pac Man (464, 664, 6128) 


Heft 5/87 

Commodore 

Bestell-Nr. COM CK 5/3 16,-- DM 
Bestell-Nr. COM CD 5/3 20,- DM 


Traffic Memory (VC 20), Shooter (VG 
20), Neuer Input (C16/116/plus 4), 
Superlist (© 16/116/plus 4), Marble (C 
16/116/plus 4-64 K), Character- 
Generator (© 16/116/plus 4), Quadrato 
(C 64), FCMON Teil 2 (C 64), Minas 
Gundur (c 64), Festspeicher (C 64) 


"Schneider 

‚Bestell-Nr. COM SK 5/3 16,-- DM 
Bestell-Nr. COM SD 5/3 23,- DM 
'Omeganea, Screen Dump, Double 
‚Trouble 


Heft 6/87 

Commodore 

Bestell-Nr. COM CK 6/3 16,- DM 
Bestell-Nr. COM CD 6/8 20,-- DM 


Mountain Jack (VG 20), REM- 
:Zeileninvertierer (VC 20), Recovery (G 
16/116/plus 4), Airwolf (C 16), Turtle 
Grafik (C16/116/plus 4-64 K), Super 16 
(GC 16/116/plus 4-64 K), Checksummer 
(© 64), Duell 2005 (C 64), DCMON Teil 
3 (C 64), Town Rescue (C 64) 


Schneider 

Bestell-Nr. COM SK 6/3 16,-- DM 
Bestell-Nr. COM SD 6/3 23,-- DM 
Break out, Luna 9 (464), Autobak (464), 
Checksummer 


Heft 7/87 

Commodore 

Bestell-Nr. COM CK 7/3 16,-- DM 
Bestell-Nr. COM CD 7/3 20,-- DM 


Bomb Scare (VC 20 + 8K), Eixanor (VG 
20), Checksummer (C 16), Checksum- 
mer (C 16-MC), Fight in the Dessert (C 
16), Tom and the Apple Farm (C 
16/116/plus 4), Toolbox (C 16), Defense 
(© 16), Tapecopy (© 16), Autostarter (C 
16), Monitorschutz (C 16), Nibbler (C 


64). Window (C 64), Psion 3.(C: 64),: 


Hungry Hoodelum (C 64) N 


Schneider 
Bestell-Nr. COM SK 7/3 16,- DM 
Bestell-Nr. COM SD 7/3 23,-- DM 


Grenad 2.0 (464/664/6128), Mini Brea- 


kout (464/664/6128), Firmjump (464), 
Nightforce (464) 


‚ in.einer Reihe (C 64) 


Heft 8/87 


Commodore 

Bestell-Nr..COM CK 8/3 16,- DM 
Bestell-Nr. COM CD 8/3 20,- DM 
ZS-GEN (VC 20 + 3 K), BATMAN 
(vC' 20), Checksummer (MC, G 16), 
Turbo-Tape (C 16), Gosub mit Labels 
(C 16/116/ +4), Admiral (C 16 + 64. K), 
ZS-GEN (C 64), RAID (C 64), Zauber- 
wald (C 64) 


Schneider 

Bestell-Nr. COM SK 8/3 16,- DM 
Bestell-Nr. COM SD 8/3 23,- DM 
Diskmonitor (464), Orgel-Champ 


(464/664/6128), Buffalo Bill (464), Bliz- 
zard (464/664/6128) 


Heft 9/87 

Commodore 

Bestell-Nr. COM CK 9/3 16,- DM 
Bestell-Nr. COM CD 9/3 20,- DM 


Tauziehen (VC 20), Handwerker (VC 20 

+ 3K), Pius Basic (C 16/116), Invert 16 
(© 16/116/+4), JMP (C 16/118/+4), 
MC-Checksummer (C 16), Bildmaker (C 
64), Fünf Wochen im Ballon (C 64) 


Schneider 

Bestell-Nr. COM SK 9/3 16,- DM 
Bestell-Nr. COM SD 9/3 23,- DM 
P.P.S. (446/664/6128), Prostar (464) 


Heft 10/87 


Commodore 

Bestell-Nr. COM CK 10/3 16,- DM 
Bestell-Nr. COM CD 10/3 20,- DM 
Fragezeichen (VC 20+3 K), MC- 
Checksummer (C 16), Games Basic (C 


18/116/plus 4), Ausweichmanöver (C - 


16/116/plus 4), Eierlaufen (C16/116/ 
plus 4), Good Shot (C16/116/plus 4), 
Checksummer (© 64), Laufschrift (C 64), 
Floppy-Monitor (C 64), Blaster (C 64) 


Schneider 
Bestell-Nr. COM SK 10/8 16,- DM 
Bestell-Nr. COM SD 10/3 23,- DM 


Turbo-Sprites (464/664/6128), Star 
Treck (464/664/6128), X-Race (464), 


Amsbreak (464/664/6128), Screens 
(464), Create (464) 

Heft 11/87 

Commodore 

Bestell-Nr. COM CK 11/3  16,- DM 


Bestell-Nr. COM CD 11/3 20,- DM 
Wormy (VG 20), Kursiv-Creater (C 16), 
MC-Checksummer (C 16), Creature 
Castle (C 16/116/plus 4), Alfred (C 
-16/116/plus 4), Checksummer: (C 16), 
Time 64 (C 64), Last Mission (C 64), Vier 


Schneider ; 
Bestell-Nr. COM SK 11/3 
Bestell-Nr. COM SD 11/3 23,- DM 


Texter (464/664/6128), Burning Wheels .. 


'(464/664/6128), Syndrome’s Message 
(464/664/6128), Quadrato (464/664/ 
6128), Checksummer (CPC) 


16,- DM 


Zeitschriften und Programme von 1987/88 


Heft 12/87 


Commodore 

Bestell-Nr. COM CK 12/3 16,- DM 
Bestell-Nr. COM CD 12/3 _20,- DM 
Alien Attack (VC 20), Super-Senso (VC 
20 + 3 K), MC-Checksummer (C 16), 
Egon (C 16), Hunter (C 16), Basic- 
Bequem (C 16), Checksummer (C 64), 
Burgenstürmer (C 64), Malibu (© 64) 


Schneider 

Bestell-Nr. COM SK 12/3 16,- DM 
Bestell-Nr. COM SD 12/3 23,- DM 
GENAD 2.1 (464/664/6128), Multimode 
(464), Master Mission (464/664/6128), 
Fireball (464/664/6128) 


Heft 1/88 

Commodore 

Bestell-Nr. COM CK 1/4 16,- DM 
Bestell-Nr. COM CD 1/4 20,- DM 


Kupka-Kola (VC 20) Pac (VC 20 + 8K), 
Checksummer (© 16), MC- 
Checksummer (C 16), Append (C 
16/116/+4), 15’er Puzzle (C 16/116/ 
+4), Invasion (C 16/116/ +4), Quadris 
(© 18/116/+4), Directory-Help (C 64), 
Auto-Start (C 64), Push II (C 64), Check- 
summer (C 64), Jac the Pac (C 64), 


Mission Germany (C 64) 

Schneider 

Bestell-Nr. COM SK 1/4 16,- DM 
Bestell-Nr. COM SD 1/4 23,- DM 


Symbol Poker (464/664/6128), Hexkey 


(464/664/6128), Print Pictures(464/ 
664/6128), Windfall (464) 

Heft 2/88 

Commodore 

Bestell-Nr. COM CK 2/4 16,- DM 
Bestell-Nr. COM CD 2/4 20,-"DM 


Fred the Snake (VC 20+3 K), DINA 4 
Hardcopy (plus 4), Reversa (C 16), 
Space Fly (© 16+32 K/plus 4), Sputnic 
Game (C 64), Smash (C 64) 


Schneider 

Bestell-Nr. COM SK 2/4 16,- DM 
Bestell-Nr. COM SD 2/4 23,- DM 
Asteroids (464/664/6128) 

Heft 3/88 

Commodore 

Bestell-Nr. COM CK 3/4 16,- DM 
Bestell-Nr. COM CD 34 20,- DM 


Pixel-Grafik (VC 20), Pooyan (VC 20), 
Grafiklupe (C 16/116/plus 4), Farbta- 
stenbelegung (GC 16/116/plus 4), Firelab 
(© 16/1 16/plus 4), MC-Checksummer (C 
16), C 64-Checksummer, Multitoolbox 
(C 64), Kursiv-Creater. (C 64), Copter- 
Duell (C 64), Mad Mission (C 64), Drei 


Drachentöter (C 64) 

Schneider 

Bestell-Nr. COM SK 3/4 16,- DM 
"Bestell-Nr. COM SD 34 23,- DM 
Filemanager (464), Light-Gunner 
(464/664/6128) 


SOFTWARE-SERVICE EEE 


Heft 4/88 


Commodore 

Bestell-Nr. COM CK 4/4 16,- DM 
Bestell-Nr. COM CD 4/4 / 
Char-Befehl (C 16/116/plus 4), Check- 
summer (C 16), MC-Checksummer (© 
16), Scorehunt (C .16/116/plus 4), 
Char-Menü (C 64), Sky-Fighter (C 64), 
Scoit (C 64) | 


Schneider : 
Bestell-Nr. COM SK 4/4 16,- DM 
Bestell-Nr. COM SD 4/4 23,- DM 


Laufschrift (464/664/6128), Tron Tor- 
nado (464/664/6128), Checksummer 
(CPC) 2 


Heft 5/88 

Commodore 

Bestell-Nr. COM CK 5/4 16,- DM 
Bestell-Nr. COM CD 5/4 20,- DM 


ter (C 16 + 64 K), Window-window (© 
16/116/+4), Starwars (C 16/116/+4), 
Char-PrinV/Char-Basic (C 64), Kosmo- 
drom (C 64) N 


Schneider 
Bestell-Nr. COM SK 5/4 16,-:DM 
Bestell-Nr. COM SD 5/4 23,- DM 


Diskettenverwaltung (464/6128), Trick 
er (4641664/6128), Checksummer 


Heft 6/88 


Commodore ; 
Bestell-Nr. COM CK 6/4 16,- DM 


Char-Adress/Char-Rom (C 64), Hires- 
Mirror (C-16/116+64K/plus 4), Mister 
Stone (C 64), Krackout (C-16/116/plus 
4), Nightmare (C 64), Xelien (C- 
16/1 16/plus 4) 


Schneider 
Bestell-Nr. COM SK 6/4 16,- DM 
Bestell-Nr. COM SD 6/4 23,- DM 


664/6128), Subcommand (464/664/ 
6128), Alien-Landing (464/664/6128) 
EINER | 
Commodore 

Bestell-Nr. COM.CK 7/4 16,- DM 
Bestell-Nr. COM CD 7/4 20,- DM 


Ghostwriter (C 64), Ganymed (C 64), 
Speicherplatz (C 16), Basic-Sucher (G 
16), High Screen Polish (C 16), Hypra 
Load (C 16), Hacker Training (C 16) . 


Schneider 2 


Bestell-Nr. COM SK 7/. 16,- DM 
“ Bestell-Nr. COM SD 74 23,- DM 


‚ Tapecopy (464), The Expedition (464), 


Zurück in die.Zukunft (464/664/6128), 
Checksummer (464/664/6128) 


Hefte und Programme Compute mit.(Normalausgabe) 


C16-SA 4/88 
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C-64 


Superpaket 1 
Baller-Spiele 
Mission Code, Duell 2005, Intercep- 
ter Base, Space Odyssey, Raid 


CBK-1 20,- DM 
CBD-1 20,- DM 










Superpaket 2 
Strategie-Spiele 

Quadrato, 4 in einer Reihe, Mühle, 
Joe, Rowiy, Psion 


CSK-1 
CSD-1 










20,- DM 
20,- DM 











Superpaket 3 
Abenteuer-Spiele 


Stonsage Comic, Taxi-Driver, Biene 
Maya, Shila, Minas  Gundur, 
Treasure-Hunt 


CAK-1 
CAD-1 












20,- DM 
20,- DM 







Superpaket 4 
Geschicklichkeits- 
Spiele 

Schotter, Space-TAXI, Haunted Inn, 
Turbo Racer 

CGK-1 
CGD-1 







20,- DM 
20,- DM 






pien der Spielbeschreibungen. 


Anleitungen zu unseren Programmen erhalten Sie aus unseren Hef- 
ten. Bei ausverkauften Heften erhalten Sie zum Heftpreis Fotoko- 


Hefte ohne Software nur gegen Vorkasse! 


Spitzenspiele zum Superpreis! 


C-16/116/+4 


Superpaket 1 
Baller-Spiele 


Good Shot, Hunter, Cosmic Terror, 


* Hyperspace 


OBK-1 
OBD-1 


20,- DM 
20,- DM 








Superpaket 2 
Geschicklichkeits- 
Spiele 


Grazy Worm, Panic, Frogger, Egon, 
Eierlauf, Ausweichmanöver, * Dan- 
ger Willi, Tom, Airwolf, McStoney 


OGK-1 20,- DM 
OGD-1 20,- DM 











Superpaket 3 
Strategie-Spiele 


Cube, Super Q-Bert, Schwimmen, 
Quadrato, Memory, * Admiral, 
15ner Puzzle, Quadris 


OSK-1 
OSD-1 


20,- DM 
20,- DM 












Achtung!!! 
Die mit * gekennzeichneten 
Programme benötigen 
mindestens 32 K RAM 















Schneider CPC 


Superpaket 1 
Baller-Spiele 
Smash It, Hero, Triton, Red Alert, 
Procon Delta, Double Trouble, 


Omeganea, Luna 9 (nur 464), Night 
Force (nur 464), Blizzard 


SBK-1 20,- DM 
SBD-1 20,- DM 















Superpaket 2 
Geschicklichkeits- 
Spiele 

Pacman, Boing Boing, Master Miss- 
ion, Fireball, Breakout, Amsbreak, 


Orbit Chikane, Panik, Burning 
Wheels 


SGK-2 
SGD-2 


software service 


Der Tronic-Verlag bietet Spitzen- 

software für Jedermann. 

Überzeugen Sie sich von unseren 

Angeboten, und bestellen Sie noch 

heute. Alle Bestellungen werden 
"innerhalb nur 









20,-DM 
20,:!DM 






1 Woche 


nach Eingang bearbeitet. 
Telefonische Bestellung unter der 
Rufnummer 


0 56 51 13 00 11 
bis 19.00 Uhr 





C16-SA 4/88 


(„Compute mit” - die populäre deutsche 
Listing-Zeitschrift - bringt tolle Programme, 
Tips, Reviews und geballte Information 
monatlich für nur 3,80 DM! Ein Muß 
für alle C-16-, C-16-, CPC 464-, 

664- und 6128-User! Schaut doch 
mal rein!) 


In der nächsten Compute mit 
(Normalausgabe 8/88) 


Userport im Selbstbau 


detallierte Bauanleitung und Beschreibung 
für C-16 und Plus 4 
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BEL. BI nn. Sehhnanähnr ad 


BLEI IE TS Breakout-Klassikers 
sorgt mit 36 verschiedenen :Leveln, 6 
» -, Schwierigkeitsstufen und 2-5 ieler-Mo- 
a „(eihzeitigt) für reichlich Ab- 
wen slung 
une er Diskette hen 


"ÄCE2 7 * 


- PLOT onag 


5 2» PZLOT TUO 
„= PLANGS 03 
F5 ScoR« 





Keleleleleieie] 


s Der Nachfolger des berühmten Kampf- 
... und Flugsimulators ACE ist da! Diesmal 
können..2 Spieler auf einem geteilten 
Bildschirm gleichzeiti ig aeneraner 
antreten. Nur für PLUS/4 und C-16/116 
"mit 64 K RAM! 











ALIEN INVASION 


Räumen Sie in einem stark 
„ten feindlichen: Lager auf. 


JUMP JET 


KARATE KING und Melissa. 5 2° 
we R) Das beste Karatespiel mit ausge- 113,070 NOVA = 
EL dd ..”  Zeichneter Animation durd»fimmer, Vertikal serollendes Actionspiel mit 


frei Me 








sur Be ir . F Bas n Be z = 
et EEE 


SEEN | 


In einer gigantischen unterirdischen Höhle müssen Sie mit 
Ihrem Hubschrauber ein feindliches Kraftwerk aufspüren 

ea elninleren. Aber der Weg dorthin ist lang und ge- 
ä 


Kassette _ hd 
oder Diskette an = 


CHAMPIONSHIP te 


Das. berühmte Cätcher- 
Spiel von EPYX gibt es 
jetzt auch in einer neuen 
Version für Ihren C-16 
oder PLUS/4. Schaffen Sie 


+ awse es, Ihre furchterregenden 
8 e Gegner „ aufs Kreuz zu le- 
>7 = A ‚gen”? & 
& 2 ua assette 
SB x 
D A . 
4 ef | 





= Kassette Diskette a ä - 
e x f 
keep See unseren jr 
DO Bitte senden Sie mir Bares en Gesamt-Katalog an 
Ihren aktuellen Katalog min einer 
. weiteren Prodükten für Ihren 
in RN 
Eintach € a ausschneiden 





und ab\die 
„KINGSOFT, Grüner Weg 285100 Aachen 


Ein spannender Kampf- nn. Flu - 
mulator'mit'einem pt, und Fugsi 


Kassette oder Diskette: 


Die einzi Elaite = Spielesammlung Eckkasiv für alle Plüs/4-3 
Besitzer (oder C-16/116 mit 64 K RAM). Nicht weniger.als 
6 hervorragende Spiele gibt's hier zum Preis von ginem:-: 


OUT ONA LMB" sn) 
in Kletter- un: ngspiel na 
dem bekannten Märchen. Fhinye 


STRIP POKER 


prachausgabe und we schneller 
era k. 


FIRE GALAXY 


8 
on aXri 


CL pıaver 
8 ® ? En 
.. x > R.@ 
# Ss 
° BE 
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a.” URE “. 
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 Hınvı 1 
TEE En: 


„Das neueste Weltraum-Actionspiel von 
Henrik Wening: Immer neue Angreifer 
in immer neuen Formationen erwarten 
Sie. Hier darf nach : 
Herzenslust gebal- ei 
lert werden. e 
Kassette oder Diskette 


SPY. VS. SPY. 


UHLTE 
N 










Lo 


I] 






Wer kennt sie nicht - die Abenteuer von 


„Spion gegen Spion“? Endlich können 
äuch C-16- und PLUS/4-Besitzer an’ die- 
sem Spielspaß « 4 
„teilhaben, SR 3 
Kassette im 
SPITZEN-SOFTWARE 


me IN GERMANY. 


/ I! 
K IN eroa 







en Eis 


GRÜNER 'WEG 29 : D-5100 AACHEN 


3 0241/15 20 51 - Fax 0241/1152054 . 





Das „klassische“ Kartenspiel mit:dem "7 
ee Etwas; spielen Sie a ar 



















